Bearing on a great circle

Time bar (total: 27.8s)

start0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

analyze871.0ms (3.1%)

Memory
17.7MiB live, 1 138.0MiB 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.5s (23.2%)

Memory
-113.4MiB live, 6 742.0MiB allocated
Samples
5.2s5 686×1valid
668.0ms2 570×0valid
Precisions
Click to see histograms. Total time spent on operations: 5.3s
ival-sin: 2.3s (43.6% of total)
ival-cos: 1.8s (33.6% of total)
ival-mult: 496.0ms (9.4% of total)
adjust: 293.0ms (5.5% of total)
ival-atan2: 211.0ms (4% of total)
ival-sub: 195.0ms (3.7% of total)
ival-true: 8.0ms (0.2% of total)
ival-assert: 3.0ms (0.1% of total)
Bogosity

explain516.0ms (1.9%)

Memory
-38.3MiB live, 766.9MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
64122(1.6838215212875928e+41 7.812156293077006e-55 -4.630862397106169e-78 2.0475496205946433e+280)0-(cos.f64 (-.f64 lambda1 lambda2))
63123(1.6838215212875928e+41 7.812156293077006e-55 -4.630862397106169e-78 2.0475496205946433e+280)0-(sin.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))sensitivity1860
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity1860
Confusion
Predicted +Predicted -
+530
-13370
Precision
0.2849462365591398
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+5300
-133070
Precision?
0.2849462365591398
Recall?
1.0
Freqs
test
numberfreq
070
2186
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
303.0ms354×1valid
39.0ms158×0valid
Compiler

Compiled 208 to 55 computations (73.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 298.0ms
ival-cos: 109.0ms (36.6% of total)
ival-sin: 96.0ms (32.3% of total)
ival-atan2: 39.0ms (13.1% of total)
ival-mult: 25.0ms (8.4% of total)
adjust: 20.0ms (6.7% of total)
ival-sub: 9.0ms (3% of total)
ival-true: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)

preprocess157.0ms (0.6%)

Memory
4.7MiB live, 80.5MiB allocated
Algorithm
egg-herbie
Rules
878×unsub-neg
802×distribute-lft-neg-in
550×associate-*r*
512×lower-fma.f64
512×lower-fma.f32
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.4MiB live, 0.4MiB allocated
Compiler

Compiled 0 to 4 computations (-∞% saved)

prune1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
81.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 24 to 17 computations (29.2% saved)

simplify32.0ms (0.1%)

Memory
-17.2MiB live, 40.0MiB 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)))))
Rules
512×lower-fma.f64
512×lower-fma.f32
384×lower-*.f32
376×lower-*.f64
144×lower-+.f64
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))

localize220.0ms (0.8%)

Memory
31.2MiB live, 226.9MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.162441259768442
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy0.20703125
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.823871334483671
(sin.f64 (-.f64 lambda1 lambda2))
Samples
164.0ms177×1valid
42.0ms79×0valid
Compiler

Compiled 92 to 19 computations (79.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 161.0ms
ival-sin: 54.0ms (33.5% of total)
ival-cos: 46.0ms (28.5% of total)
ival-mult: 44.0ms (27.3% of total)
adjust: 8.0ms (5% of total)
ival-sub: 5.0ms (3.1% of total)
ival-atan2: 5.0ms (3.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series30.0ms (0.1%)

Memory
-10.1MiB live, 63.5MiB 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
5.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
phi1
@-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
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))))

simplify174.0ms (0.6%)

Memory
15.0MiB live, 251.8MiB allocated
Algorithm
egg-herbie
Rules
11 752×lower-fma.f64
11 752×lower-fma.f32
5 552×lower-*.f64
5 552×lower-*.f32
2 342×lower-+.f64
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))

rewrite225.0ms (0.8%)

Memory
-23.4MiB live, 334.9MiB allocated
Rules
7 596×lower-fma.f64
7 596×lower-fma.f32
5 736×lower-*.f32
5 728×lower-*.f64
3 008×lower-/.f64
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
(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 #s(literal 1/2 binary64) (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1/2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (-.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1)))
(/.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 phi2) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (cos.f64 phi2) (-.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)))) (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 (neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (fma.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (-.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) (pow.f64 (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(neg.f64 (/.f64 (+.f64 (sin.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal -2 binary64)))
(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)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(+.f64 (*.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 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (*.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.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)))) (neg.f64 (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 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (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 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(/.f64 (-.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))) (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))))
(fma.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(fma.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(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)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 #s(literal 0 binary64)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 #s(literal 0 binary64)) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(-.f64 (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(+.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(*.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)))
(*.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 6 binary64)))) (fma.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (-.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (*.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64))))
(*.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64)) (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)))
(*.f64 (pow.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) #s(literal -1 binary64)) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))
(*.f64 #s(literal 1 binary64) (-.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 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(*.f64 (+.f64 lambda2 lambda1) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))
(*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64))))
(*.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64)))
(*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (/.f64 (-.f64 lambda1 lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (pow.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) #s(literal -1 binary64))))
(*.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (pow.f64 lambda2 #s(literal 4 binary64))) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 6 binary64))) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64))) (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 6 binary64))) (pow.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) #s(literal -1 binary64))) (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 9 binary64)) (pow.f64 lambda2 #s(literal 9 binary64))) (pow.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) #s(literal -1 binary64))) (+.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (+.f64 (pow.f64 (*.f64 lambda2 lambda1) #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 6 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))) (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (*.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))) (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (fma.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)) (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (-.f64 (neg.f64 lambda2) lambda1))
(/.f64 (-.f64 (pow.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))) #s(literal 3 binary64))) (fma.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))) (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))) (fma.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))) (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))) (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (fma.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (*.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)))) (neg.f64 (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) #s(literal 1 binary64)) (+.f64 lambda2 lambda1))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) #s(literal 1 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (pow.f64 lambda2 #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64))) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 lambda1 #s(literal 9 binary64)) (pow.f64 lambda2 #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (+.f64 (pow.f64 (*.f64 lambda2 lambda1) #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 6 binary64)))) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (*.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (pow.f64 lambda2 #s(literal 3 binary64)))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.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))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(/.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)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 9 binary64)) (pow.f64 lambda2 #s(literal 9 binary64))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (+.f64 (pow.f64 (*.f64 lambda2 lambda1) #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 6 binary64))))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 6 binary64))) (*.f64 (+.f64 lambda2 lambda1) (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 6 binary64)) (pow.f64 lambda2 #s(literal 6 binary64))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))))
(/.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda2 lambda2 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) lambda1))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1)))
(/.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)))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1))) (+.f64 lambda2 lambda1)))
(neg.f64 (/.f64 (neg.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))))
(neg.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (/.f64 (pow.f64 lambda1 #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)) (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 6 binary64)))) (fma.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (-.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (*.f64 lambda1 lambda1)) (pow.f64 lambda1 #s(literal 4 binary64))) (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(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)))))
(fma.f64 (pow.f64 lambda1 #s(literal 3/2 binary64)) (/.f64 (pow.f64 lambda1 #s(literal 3/2 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(fma.f64 (*.f64 lambda1 lambda1) (/.f64 lambda1 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64)) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) #s(literal -1 binary64)) (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 lambda2 #s(literal -1 binary64) lambda1)
(fma.f64 lambda1 (/.f64 (*.f64 lambda1 lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2)
(-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1))
(-.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))) (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(-.f64 lambda1 lambda2)
(+.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1))) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(+.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 1 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.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)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.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)) (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (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)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.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))))
(fma.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))))
(-.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 lambda1 (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (neg.f64 (sin.f64 lambda2))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2)))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.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)))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.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))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1 binary64)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal -2 binary64)))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.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))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(/.f64 (*.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))) (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (*.f64 (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))) #s(literal -2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (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))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal -2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (*.f64 #s(literal -2 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(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)))
(fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(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 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))

eval156.0ms (0.6%)

Memory
3.3MiB live, 202.0MiB allocated
Compiler

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

prune181.0ms (0.7%)

Memory
23.3MiB live, 272.7MiB allocated
Pruning

43 alts after pruning (43 fresh and 0 done)

PrunedKeptTotal
New49443537
Fresh000
Picked101
Done000
Total49543538
Accuracy
90.3%
Counts
538 → 43
Alt Table
Click to see full alt table
StatusAccuracyProgram
89.9%
(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)))))
69.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)))))
77.9%
(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)))))
81.1%
(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.0%
(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)))))
89.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.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)))))
75.6%
(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)))))
89.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)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(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)))))
77.8%
(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)))))
76.0%
(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)))))
81.4%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
71.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2)))) (sin.f64 phi1)) #s(literal 2 binary64))))
81.1%
(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)))))
81.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
80.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 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
81.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)) (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))))))
81.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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
81.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)) (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))))))))
78.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 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))))))
60.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)) #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))))))
66.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))))))
66.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))))))
72.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
69.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
81.2%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
51.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))) (*.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.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 (*.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))))
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.9%
(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))))))
24.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (fma.f64 (neg.f64 lambda2) lambda2 (*.f64 lambda1 lambda1)) (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64)))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.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)))))
77.1%
(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)))))
40.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)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.1%
(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)))))
62.7%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))) (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.5%
(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)))))
61.7%
(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)))))
49.4%
(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.5%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
45.6%
(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.5%
(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)))))
50.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)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 2 906 to 1 950 computations (32.9% saved)

simplify120.0ms (0.4%)

Memory
4.5MiB live, 200.0MiB 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 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2))
cost-diff0
(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)))))
cost-diff14528
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
cost-diff512
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
cost-diff640
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
cost-diff640
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2))
cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
cost-diff0
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
cost-diff0
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
cost-diff0
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
cost-diff0
(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)))))
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
(cos.f64 lambda2)
cost-diff0
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
cost-diff0
(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)))))
cost-diff6720
(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)))
Rules
9 440×lower-fma.f32
9 438×lower-fma.f64
3 476×lower-*.f32
3 446×lower-*.f64
2 010×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
060795
0109779
1184767
2456757
31454692
44924600
08286599
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(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)))))
(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 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(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))))
(*.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 (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)))))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
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)
lambda1
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
phi2
#s(literal 1/2 binary64)
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)
(-.f64 lambda2 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 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)))))
(*.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 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
lambda1
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))
#s(literal 1 binary64)
(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 (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 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(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 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(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))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.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)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
#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))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.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)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (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 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
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))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.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)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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)
lambda1
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(cos.f64 phi2)
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(neg.f64 phi2)
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2))
(*.f64 #s(literal -2 binary64) phi2)
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)
(fma.f64 #s(literal -2 binary64) phi2 (-.f64 lambda1 lambda2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
phi2
#s(literal 1/2 binary64)
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(sin.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(*.f64 (-.f64 lambda2 lambda1) #s(literal -2 binary64))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)
(-.f64 lambda2 phi2)
(-.f64 (*.f64 (cos.f64 phi1) (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) (*.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)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (*.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 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(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)
(/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda1 lambda2)))
#s(literal 1 binary64)
(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))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.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)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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))

localize773.0ms (2.8%)

Memory
-26.9MiB live, 1 018.5MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy5.757277385051907
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.823871334483671
(sin.f64 (-.f64 lambda1 lambda2))
accuracy13.85193136156638
(sin.f64 (+.f64 lambda2 lambda1))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.823871334483671
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
accuracy21.74724657913436
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
accuracy36.67592285430124
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2))
accuracy0.20703125
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.823871334483671
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
accuracy33.33761221480825
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
accuracy0.20703125
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda1 lambda2))
accuracy13.823871334483671
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.964595752402346
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.154628759768442
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
accuracy0.17482377930532605
(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)))
accuracy0.20703125
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda1 lambda2))
Samples
559.0ms243×1valid
12.0ms2valid
3.0ms0valid
Compiler

Compiled 777 to 55 computations (92.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 453.0ms
ival-sin: 183.0ms (40.4% of total)
ival-cos: 112.0ms (24.7% of total)
ival-mult: 60.0ms (13.2% of total)
adjust: 37.0ms (8.2% of total)
ival-atan2: 31.0ms (6.8% of total)
ival-sub: 18.0ms (4% of total)
ival-add: 7.0ms (1.5% of total)
ival-div: 3.0ms (0.7% of total)
ival-neg: 3.0ms (0.7% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series187.0ms (0.7%)

Memory
4.6MiB live, 159.7MiB allocated
Counts
26 → 864
Calls
Call 1
Inputs
#s(alt (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))) (patch (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))) #<representation binary64>) () ())
#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())
#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<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 (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))))) (patch (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))))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())
#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())
#s(alt (*.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)) (patch (*.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)) #<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 (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 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
Outputs
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (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))) (patch (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))) #<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 (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))) (patch (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))) #<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 (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 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 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1 lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (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 phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* 1/2 (* (pow lambda1 2) (* (cos phi2) (sin lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/2 (* (cos phi2) (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/24 (* (cos phi2) (sin lambda2))) (* 1/720 (* (pow lambda1 2) (* (cos phi2) (sin lambda2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -2 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<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 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<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 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin lambda2) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2)))))))) (taylor 0 lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (- 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) (* (cos phi2) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 2 (* -2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 2 (* -2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 2 (* -2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<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))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (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 lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (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))) (patch (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))) #<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 (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))) (patch (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))) #<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 (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<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 1 (taylor 0 lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow lambda2 2))) (taylor 0 lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2))) (taylor 0 lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2))) (taylor 0 lambda2) (#s(alt (cos.f64 lambda2) (patch (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 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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<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) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (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 (* lambda2 (* (cos lambda1) (cos phi2)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* 1/6 (* (pow lambda2 2) (* (cos lambda1) (cos phi2)))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (* (cos lambda1) (cos phi2)))) (* 1/6 (* (cos lambda1) (cos phi2))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* 1/6 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* (cos lambda1) (cos phi2))) (* 1/5040 (* (pow lambda2 2) (* (cos lambda1) (cos phi2)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 lambda2) (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 lambda2) (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 lambda2) (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<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 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (cos lambda1) (* lambda2 (+ (* -1/2 (sin lambda1)) (* -1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor inf lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor inf lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor inf lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor inf lambda2) (#s(alt (cos.f64 lambda2) (patch (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 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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (- 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) (* (cos phi2) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -2 lambda2) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 2 (/ lambda1 lambda2)) 2)) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 2 (/ lambda1 lambda2)) 2)) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 2 (/ lambda1 lambda2)) 2)) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor -inf lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor -inf lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor -inf lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 lambda2) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor -inf lambda2) (#s(alt (cos.f64 lambda2) (patch (cos.f64 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 (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)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (+ 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) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -2 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (+.f64 lambda2 lambda1)) (patch (sin.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2))))))))))))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (* -1 (* (cos lambda1) (sin lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* 1/2 (* (pow phi2 2) (* (cos lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (* (cos lambda1) (sin lambda2)))) (* 1/2 (* (cos lambda1) (sin lambda2)))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/720 (* (pow phi2 2) (* (cos lambda1) (sin lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (patch (*.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)) #<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 (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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 #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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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))) (/.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))))) (patch (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))))) #<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
17.0ms
phi2
@inf
((+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (cos lambda2) (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 (* (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) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (atan2 (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin (+ lambda2 lambda1)))
10.0ms
lambda2
@0
((+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (cos lambda2) (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 (* (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) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (atan2 (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin (+ lambda2 lambda1)))
8.0ms
phi2
@0
((+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (cos lambda2) (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 (* (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) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (atan2 (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin (+ lambda2 lambda1)))
6.0ms
lambda1
@0
((+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (cos lambda2) (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 (* (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) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (atan2 (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin (+ lambda2 lambda1)))
5.0ms
phi2
@-inf
((+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (cos lambda2) (sin lambda1)) (cos lambda2) (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 (* (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) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (atan2 (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin (+ lambda2 lambda1)))

simplify510.0ms (1.8%)

Memory
17.3MiB live, 329.0MiB allocated
Algorithm
egg-herbie
Rules
14 368×lower-fma.f64
14 368×lower-fma.f32
7 722×lower-*.f64
7 722×lower-*.f32
2 754×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058711239
1197810784
2608210707
0849110507
Stop Event
iter limit
node limit
Counts
864 → 855
Calls
Call 1
Inputs
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin (* -1 lambda2)))
(+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -1 lambda2)
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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 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))))
(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 phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* 1/2 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/2 (* (cos phi2) (sin lambda2))))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/24 (* (cos phi2) (sin lambda2))) (* 1/720 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))))))))
(* -2 lambda2)
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 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)))))))))
(sin lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/2 (sin lambda2)) (* -1/6 (* lambda1 (cos lambda2))))))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(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)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos 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) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* 2 lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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))
(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))))) (- (* (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 (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(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 (- 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 (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 lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* 2 lambda1)
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(sin (- lambda2 (* -1 lambda1)))
(* (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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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)))))))
1
(+ 1 (* -1/2 (pow lambda2 2)))
(+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))
(+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 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)))))
(* (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))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 phi2)) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1)))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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)))
(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))
(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 (* lambda2 (* (cos lambda1) (cos phi2))))
(* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* 1/6 (* (pow lambda2 2) (* (cos lambda1) (cos phi2))))))
(* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (* (cos lambda1) (cos phi2)))) (* 1/6 (* (cos lambda1) (cos phi2)))))))
(* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* 1/6 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* (cos lambda1) (cos phi2))) (* 1/5040 (* (pow lambda2 2) (* (cos lambda1) (cos phi2))))))))))
(* 2 lambda1)
(+ (* -2 lambda2) (* 2 lambda1))
(+ (* -2 lambda2) (* 2 lambda1))
(+ (* -2 lambda2) (* 2 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) (* 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))))))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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))
(cos lambda2)
(cos lambda2)
(cos lambda2)
(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 (- 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))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(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)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(* (sin (+ lambda1 lambda2)) (sin (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos 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) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -2 lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin (+ lambda1 lambda2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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))
(cos lambda2)
(cos lambda2)
(cos lambda2)
(cos 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)))))
(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 (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(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))))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(* (sin (+ lambda1 (* -1 lambda2))) (sin (- lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos 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) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -2 lambda2)
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(sin (- lambda1 (* -1 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2)))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2)))))))))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (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)))))
(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))))))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 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)))))
(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))))))))
(* -1 (* (cos lambda1) (sin lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* 1/2 (* (pow phi2 2) (* (cos lambda1) (sin lambda2)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (* (cos lambda1) (sin lambda2)))) (* 1/2 (* (cos lambda1) (sin lambda2))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/720 (* (pow phi2 2) (* (cos lambda1) (sin lambda2)))))))))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 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)))
(* (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) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 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)))
(* (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) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (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) (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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (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) (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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (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) (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
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.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/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* lambda1 (cos lambda2))
(*.f64 (cos.f64 lambda2) lambda1)
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2)) lambda1)
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* 1/120 (* (pow lambda1 2) (cos lambda2)))))))
(fma.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 (cos.f64 lambda2) lambda1))
(* lambda1 (+ (cos lambda2) (* (pow lambda1 2) (+ (* -1/6 (cos lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (cos lambda2))) (* 1/120 (cos lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))))) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.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/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.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 lambda1 (sin.f64 lambda2)) #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) (cos.f64 lambda2)) lambda1 (*.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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.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/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.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 lambda1 (sin.f64 lambda2)) #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) (cos.f64 lambda2)) lambda1 (*.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)
(* (cos (* -1 phi2)) (sin (* -1 lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(fma.f64 (*.f64 (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))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(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 lambda1 (sin.f64 lambda2)) #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) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (neg lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.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/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(* (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)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (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 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 #s(literal -1/2 binary64) (*.f64 lambda1 (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))) 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 phi2) (sin lambda2)))
(*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* 1/2 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))) (* 1/2 (* (cos phi2) (sin lambda2))))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal -1/24 binary64) (*.f64 lambda1 lambda1) #s(literal 1/2 binary64))) (*.f64 lambda1 lambda1)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* 1/2 (* (cos phi2) (sin lambda2))) (* (pow lambda1 2) (+ (* -1/24 (* (cos phi2) (sin lambda2))) (* 1/720 (* (pow lambda1 2) (* (cos phi2) (sin lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (*.f64 (pow.f64 lambda1 #s(literal 4 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/720 binary64) (*.f64 lambda1 lambda1) #s(literal -1/24 binary64)))))
(* -2 lambda2)
(*.f64 #s(literal -2 binary64) lambda2)
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(sin (* -1 lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 (sin.f64 lambda2)) #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 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1 (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(sin lambda2)
(sin.f64 lambda2)
(+ (sin lambda2) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (sin.f64 lambda2))
(+ (sin lambda2) (* lambda1 (+ (cos lambda2) (* -1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 (sin.f64 lambda2)) #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 #s(literal -1/2 binary64) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) lambda1)) lambda1 (cos.f64 lambda2)) lambda1 (sin.f64 lambda2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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)
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
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 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (- 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 (- 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) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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)
(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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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)
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
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 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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))
(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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (- 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 (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 lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal 2 binary64) #s(literal -2 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal 2 binary64) #s(literal -2 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal 2 binary64) #s(literal -2 binary64)) (neg.f64 lambda1))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(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))
(sin (- lambda2 (* -1 lambda1)))
(sin.f64 (+.f64 lambda1 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 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.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 #s(literal -1/2 binary64) (*.f64 lambda2 (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 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1/2 (* (pow lambda2 2) (sin lambda1))))
(*.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #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 lambda2 lambda2) #s(literal -1/2 binary64) #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)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow lambda2 2)))
(fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (* (pow lambda2 2) (- (* 1/24 (pow lambda2 2)) 1/2)))
(fma.f64 (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (*.f64 lambda2 lambda2) #s(literal 1 binary64))
(+ 1 (* (pow lambda2 2) (- (* (pow lambda2 2) (+ 1/24 (* -1/720 (pow lambda2 2)))) 1/2)))
(fma.f64 (fma.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64)) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64)) (*.f64 lambda2 lambda2) #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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.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 #s(literal -1/2 binary64) (*.f64 lambda2 (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 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64)))) 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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.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 #s(literal -1/2 binary64) (*.f64 lambda2 (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 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64)))) 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)
(* (cos (* -1 phi2)) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1)))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 phi2)) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64)))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.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 #s(literal -1/2 binary64) (*.f64 lambda2 (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 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (cos.f64 phi2))) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64)))) lambda2 (*.f64 (sin.f64 lambda1) (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) (sin.f64 lambda1)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda1))) lambda2 #s(literal -1 binary64)) lambda2) lambda2 (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64)))
(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 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2) (*.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))
(+ (* 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 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(* -1 (* lambda2 (* (cos lambda1) (cos phi2))))
(*.f64 (*.f64 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)))
(* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* 1/6 (* (pow lambda2 2) (* (cos lambda1) (cos phi2))))))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64))) lambda2)
(* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (* (cos lambda1) (cos phi2)))) (* 1/6 (* (cos lambda1) (cos phi2)))))))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 #s(literal -1/120 binary64) (*.f64 lambda2 lambda2) #s(literal 1/6 binary64))) (*.f64 lambda2 lambda2))) lambda2)
(* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* 1/6 (* (cos lambda1) (cos phi2))) (* (pow lambda2 2) (+ (* -1/120 (* (cos lambda1) (cos phi2))) (* 1/5040 (* (pow lambda2 2) (* (cos lambda1) (cos phi2))))))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) lambda2 #s(literal -1 binary64)) (*.f64 (pow.f64 lambda2 #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 #s(literal 1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal -1/120 binary64))))) lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (* -2 lambda2) (* 2 lambda1))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(+ (* -2 lambda2) (* 2 lambda1))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(+ (* -2 lambda2) (* 2 lambda1))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 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 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))
(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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) 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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (- 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 (- 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) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -2 lambda2)
(*.f64 #s(literal -2 binary64) lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (+ lambda1 lambda2))
(sin.f64 (+.f64 lambda1 lambda2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(cos.f64 lambda2)
(cos lambda2)
(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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) 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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (- 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 (+ 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) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -2 lambda2)
(*.f64 #s(literal -2 binary64) lambda2)
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal -2 binary64) #s(literal 2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal -2 binary64) #s(literal 2 binary64)) (neg.f64 lambda2))
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal -2 binary64) #s(literal 2 binary64)) (neg.f64 lambda2))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(sin (- lambda1 (* -1 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 lambda2))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (sin.f64 lambda1)) (*.f64 phi2 phi2)))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2)))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda1)) (cos.f64 lambda2) (fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/720 binary64) (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 #s(literal -1/720 binary64) (sin.f64 lambda1)) (cos.f64 lambda2))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2)))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 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 (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #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 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* 1/2 (* (pow phi2 2) (* (cos lambda1) (sin lambda2)))))
(*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (pow phi2 2) (* (cos lambda1) (sin lambda2)))) (* 1/2 (* (cos lambda1) (sin lambda2))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/24 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/720 (* (pow phi2 2) (* (cos lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal 1/2 binary64) (*.f64 phi2 phi2) #s(literal -1 binary64)) (*.f64 (pow.f64 phi2 #s(literal 4 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal 1/720 binary64) (*.f64 phi2 phi2) #s(literal -1/24 binary64)))))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(-.f64 lambda1 lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.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 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2))))
(*.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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)
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.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))

rewrite445.0ms (1.6%)

Memory
5.3MiB live, 400.0MiB allocated
Rules
5 816×lower-fma.f32
5 814×lower-fma.f64
4 758×lower-*.f32
4 728×lower-*.f64
4 286×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
059358
0107348
1323330
22589306
010149303
Stop Event
iter limit
node limit
iter limit
Counts
26 → 517
Calls
Call 1
Inputs
(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)))
(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)))))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 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)
(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)))))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (sin.f64 (+.f64 lambda2 lambda1))))
(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)))))
(*.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 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(sin.f64 (+.f64 lambda2 lambda1))
Outputs
(*.f64 (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (cos.f64 phi2)) (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))))
(/.f64 (neg.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (pow.f64 (cos.f64 phi2) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))) (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(+.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(fma.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 lambda2)) (*.f64 (sin.f64 #s(literal 0 binary64)) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (neg.f64 lambda2))
(cos.f64 lambda2)
(+.f64 (*.f64 (cos.f64 #s(literal 0 binary64)) (cos.f64 lambda2)) (*.f64 (sin.f64 #s(literal 0 binary64)) (sin.f64 lambda2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.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)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.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))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(fma.f64 (*.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))))))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(*.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (/.f64 (-.f64 lambda1 lambda2) (pow.f64 (-.f64 lambda2 lambda1) #s(literal -1 binary64))))
(*.f64 (/.f64 (+.f64 lambda1 lambda2) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (-.f64 lambda1 lambda2) (pow.f64 (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) #s(literal -1 binary64))))
(*.f64 (*.f64 (/.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(*.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)))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda1 lambda2) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 (pow.f64 lambda2 #s(literal 3 binary64)) #s(literal -1 binary64) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 lambda2 lambda2 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) lambda1))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (-.f64 lambda1 (neg.f64 lambda2))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (neg.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 lambda1 lambda2))
(/.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)))))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(fma.f64 lambda2 #s(literal -1 binary64) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (neg.f64 lambda2))) (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 (neg.f64 lambda2))))
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))))))
(/.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))))
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))) #s(literal 1 binary64))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2))))) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2)) (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 (-.f64 lambda1 lambda2))) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 (-.f64 lambda1 lambda2)))) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (*.f64 (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))))))
(/.f64 (+.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 3 binary64))) (fma.f64 lambda2 lambda2 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 2 binary64)) (*.f64 lambda2 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) (neg.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (+.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda2 lambda2) (*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (neg.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))))) (neg.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (+.f64 lambda1 lambda2)) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (neg.f64 (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))))) (neg.f64 (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64))) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (+.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 lambda2 lambda2) (*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (+.f64 lambda1 lambda2)) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))))) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)))))
(fma.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (/.f64 (-.f64 lambda1 lambda2) (pow.f64 (-.f64 lambda2 lambda1) #s(literal -1 binary64))) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (/.f64 (+.f64 lambda1 lambda2) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (-.f64 lambda1 lambda2) (pow.f64 (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) #s(literal -1 binary64))) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (*.f64 (/.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.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)) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda1 lambda2) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2)))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda1 lambda2)))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2)))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))) (/.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2)) (/.f64 (*.f64 lambda2 lambda2) (-.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2)))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (+.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))))) (/.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 3 binary64)) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (+.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))))))
(-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (/.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (+.f64 lambda1 lambda2)) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 lambda1 lambda2))))
(-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (/.f64 (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (*.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2)) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2)))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) (neg.f64 lambda2))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 phi2 (neg.f64 (-.f64 lambda1 lambda2))))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))
(-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))
(-.f64 (-.f64 lambda1 lambda2) (+.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(-.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 #s(literal 2 binary64) phi2) (neg.f64 (-.f64 lambda1 lambda2))))
(-.f64 lambda1 (+.f64 (+.f64 phi2 lambda2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2)
(+.f64 (neg.f64 (-.f64 lambda1 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))
(+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (neg.f64 phi2) (-.f64 lambda1 lambda2)))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 (-.f64 lambda1 lambda2))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(+.f64 (-.f64 lambda1 lambda2) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(+.f64 lambda2 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64)) (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64)) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) phi2) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))))) (neg.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))))
(fma.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64) (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) phi2))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 1/2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 lambda2 #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) lambda2) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1))) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (*.f64 #s(literal 1/2 binary64) lambda2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1))) (*.f64 #s(literal 1/2 binary64) lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64))) (neg.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))))) (neg.f64 (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2)))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)))) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)))) (fma.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) lambda1) lambda2) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(fma.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 1/2 binary64) (*.f64 lambda2 #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) (*.f64 #s(literal 1/2 binary64) lambda2))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64) (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) #s(literal 1/2 binary64)) (*.f64 lambda2 #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1))) (*.f64 #s(literal 1/2 binary64) lambda2))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (sin.f64 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 #s(literal -2 binary64) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (/.f64 (-.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)) #s(literal 2 binary64))) (sin.f64 (/.f64 (+.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)) #s(literal 2 binary64)))) #s(literal 2 binary64)))
(*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(*.f64 (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(*.f64 (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)) (/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64))))
(pow.f64 (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal -1 binary64))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))) (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))))) (neg.f64 (*.f64 (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))))) (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal -1 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal 1 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64))) #s(literal 2 binary64))
(/.f64 (*.f64 (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal -1 binary64)) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))) (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))) (*.f64 (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (sin.f64 (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64))) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64))))
(-.f64 (/.f64 (/.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)) #s(literal 2 binary64)) (sin.f64 (+.f64 lambda1 lambda2))))
(atan2.f64 (*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (/.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(*.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 (+.f64 lambda1 lambda2))) (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))))
(*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (cos.f64 phi2) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))
(*.f64 (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)) (*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (/.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) (cos.f64 phi2)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))))
(*.f64 (cos.f64 phi2) (*.f64 #s(literal 1 binary64) (sin.f64 (-.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))) (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (sin.f64 (+.f64 lambda1 lambda2)))
(*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1 binary64))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2)))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))) #s(literal -1 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (-.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal 1 binary64))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))))))
(/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(-.f64 (/.f64 (cos.f64 (-.f64 (-.f64 lambda1 lambda2) (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2)) #s(literal 2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (neg.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)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.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)))) (neg.f64 (+.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)))))))
(/.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)))
(/.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))))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda1 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2))
(*.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(neg.f64 (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))
(neg.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(neg.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))
(*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (*.f64 (neg.f64 (-.f64 lambda2 phi2)) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)))))
(/.f64 (+.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)))))
(/.f64 (+.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) (*.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))))))
(/.f64 (+.f64 (pow.f64 phi2 #s(literal 3 binary64)) (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 3 binary64))) (fma.f64 phi2 phi2 (-.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (*.f64 phi2 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2)))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda2 phi2)) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda2 phi2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda2 phi2))) (*.f64 lambda1 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda2 phi2))))))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda2 phi2))) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda2 phi2))) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda2 phi2)))) (*.f64 lambda1 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda2 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2))) (neg.f64 (-.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (-.f64 (*.f64 phi2 phi2) (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (+.f64 phi2 lambda2)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (*.f64 (+.f64 phi2 lambda2) (-.f64 lambda2 phi2))))) (neg.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 phi2 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64)))))) (neg.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 phi2 lambda2)) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (*.f64 (+.f64 phi2 lambda2) (-.f64 lambda2 phi2))))) (neg.f64 (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 phi2 lambda2))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64)))))) (neg.f64 (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64))) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (-.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (-.f64 (*.f64 phi2 phi2) (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (+.f64 phi2 lambda2)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (*.f64 (+.f64 phi2 lambda2) (-.f64 lambda2 phi2)))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 phi2 lambda2)))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 phi2 lambda2)) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (*.f64 (+.f64 phi2 lambda2) (-.f64 lambda2 phi2)))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 phi2 lambda2)))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2))))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))))
(fma.f64 (/.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64)))) (/.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64))) (-.f64 (-.f64 lambda1 lambda2) phi2))
(fma.f64 (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (/.f64 (-.f64 lambda1 lambda2) (pow.f64 (-.f64 lambda2 lambda1) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (/.f64 (+.f64 lambda1 lambda2) (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (/.f64 (-.f64 lambda1 lambda2) (pow.f64 (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)) #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (*.f64 (/.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.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)) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (/.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2))) (/.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64))) (-.f64 (-.f64 lambda1 lambda2) phi2))
(fma.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda1 lambda2) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (-.f64 lambda1 (-.f64 lambda2 phi2)))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda2 phi2)))
(fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 lambda1 (-.f64 lambda2 phi2)))
(fma.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda2 phi2)))
(fma.f64 #s(literal -1 binary64) (-.f64 lambda2 phi2) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))) (/.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 (-.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (-.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)) (/.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(-.f64 (/.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2)))) (/.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2)))))
(-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (+.f64 phi2 lambda2)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 phi2 lambda2))) (/.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (*.f64 (+.f64 phi2 lambda2) (-.f64 lambda2 phi2))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 phi2 lambda2))))
(-.f64 (/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64)))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2)))))
(-.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (+.f64 phi2 lambda2)) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 phi2 lambda2))) (/.f64 (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (*.f64 (+.f64 phi2 lambda2) (-.f64 lambda2 phi2))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 phi2 lambda2))))
(-.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 lambda1 #s(literal 3 binary64))) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64)))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 phi2 (+.f64 phi2 lambda2) (*.f64 lambda2 lambda2)))))
(-.f64 (/.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)) (/.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(-.f64 (/.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))))
(-.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) (neg.f64 phi2))
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(-.f64 (-.f64 lambda1 lambda2) (+.f64 (-.f64 phi2 lambda1) (-.f64 lambda2 phi2)))
(-.f64 (-.f64 lambda1 lambda2) (-.f64 (-.f64 phi2 lambda1) (neg.f64 (-.f64 lambda2 phi2))))
(-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(-.f64 lambda1 (-.f64 (+.f64 phi2 lambda2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(+.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)
(+.f64 (neg.f64 (-.f64 lambda2 phi2)) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))
(+.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) (-.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2)))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))
(+.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(+.f64 phi2 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))
(+.f64 lambda1 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda2 phi2)))
(+.f64 lambda1 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda2 phi2))))
(fma.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))))
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))))
(*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)) #s(literal -1 binary64))
(pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 1 binary64))
(/.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))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (sin.f64 (-.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (-.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (sin.f64 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64))
(/.f64 (neg.f64 (sin.f64 (+.f64 lambda1 lambda2))) #s(literal -1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(/.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 1 binary64))
(fma.f64 (cos.f64 lambda1) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(sin.f64 (+.f64 lambda1 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (-.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (sin.f64 (-.f64 lambda2 lambda1))))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))))
(-.f64 #s(literal 0 binary64) (/.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (*.f64 (log.f64 (sin.f64 (+.f64 lambda1 lambda2))) #s(literal -1 binary64))))
(+.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))

eval504.0ms (1.8%)

Memory
12.4MiB live, 1 053.2MiB allocated
Compiler

Compiled 103 308 to 5 873 computations (94.3% saved)

prune1.2s (4.1%)

Memory
-33.0MiB live, 733.2MiB allocated
Pruning

82 alts after pruning (82 fresh and 0 done)

PrunedKeptTotal
New2 320682 388
Fresh241438
Picked505
Done000
Total2 349822 431
Accuracy
99.9%
Counts
2 431 → 82
Alt Table
Click to see full alt table
StatusAccuracyProgram
89.9%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 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)))))
99.8%
(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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
77.1%
(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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
99.8%
(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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
99.8%
(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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
81.0%
(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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
78.5%
(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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
55.9%
(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)) #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))))
76.5%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
89.9%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
83.0%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) #s(approx (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
69.3%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) #s(approx (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (*.f64 (neg.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)))))
82.4%
(atan2.f64 (fma.f64 #s(approx (* (cos lambda2) (sin lambda1)) (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)))))
77.9%
(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)))))
81.1%
(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)))))
89.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.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)))))
62.3%
(atan2.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 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)))))
77.8%
(atan2.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (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 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (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)))))
31.8%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 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)))))
79.3%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.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)))))
65.8%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
46.5%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(approx (sin (+ lambda2 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)))))
46.1%
(atan2.f64 (*.f64 (*.f64 (*.f64 #s(approx (sin (+ lambda2 lambda1)) (sin.f64 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)))))
41.9%
(atan2.f64 (*.f64 (*.f64 #s(approx (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (/.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)))))
42.5%
(atan2.f64 (*.f64 (*.f64 #s(approx (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 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)))))
76.0%
(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)))))
71.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2)))) (sin.f64 phi1)) #s(literal 2 binary64))))
81.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
80.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 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
81.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)) (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))))))
81.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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
43.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 (*.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))))
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.9%
(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))))))
77.1%
(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)))))
40.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)) (cos.f64 (-.f64 lambda1 lambda2)))))
65.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.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)))))
41.5%
(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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
48.3%
(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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
48.1%
(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)) (/.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))))))
33.5%
(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
48.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
37.0%
(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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
48.1%
(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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
31.4%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
29.3%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 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))))))
40.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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))))))
49.4%
(atan2.f64 (*.f64 #s(approx (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 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)))))
23.0%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (fma.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda1 lambda2) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
44.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
45.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
52.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 1/2 binary64)))) #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)))))
42.2%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
46.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (-.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))))))
37.4%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
38.3%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
47.0%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 (+.f64 (+.f64 phi2 lambda2) (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
46.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
46.5%
(atan2.f64 #s(approx (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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)))))
47.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (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)))))
54.9%
(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)))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.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.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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
50.4%
(atan2.f64 #s(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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
44.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)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
41.5%
(atan2.f64 #s(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 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))))))
41.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) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))))))
41.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 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))))))
45.4%
(atan2.f64 #s(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)))))
44.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) (cos.f64 phi2)) #s(approx (cos (- 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)) #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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
30.6%
(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))))))
50.3%
(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))))))
43.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (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)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (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 #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)))))
41.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (sin.f64 lambda1) (neg.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)))))
41.7%
(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 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
34.9%
(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 502 to 3 898 computations (29.2% saved)

simplify149.0ms (0.5%)

Memory
26.8MiB live, 225.0MiB 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
cost-diff192
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))
cost-diff448
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
cost-diff640
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
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)) #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))))
cost-diff6272
(+.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))))
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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
cost-diff0
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
cost-diff0
(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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
cost-diff6720
(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)))
cost-diff13568
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
Rules
11 748×lower-fma.f32
11 742×lower-fma.f64
3 882×lower-*.f32
3 834×lower-*.f64
2 470×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0831048
01511007
1280999
2713973
32305955
45443915
56925907
08227899
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(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 (cos.f64 lambda2) (sin.f64 lambda1))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
#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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 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 (*.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))))
(*.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)) #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)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
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))
(*.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)
(*.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)))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(+.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))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
(*.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)))
(*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))
#s(literal 1/120 binary64)
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
phi2
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
#s(literal 1/2 binary64)
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)
(-.f64 lambda2 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 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 lambda2)
(cos.f64 lambda1)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
Outputs
(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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(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 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(cos.f64 lambda2)
lambda2
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
(cos.f64 lambda1)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (sin.f64 phi1)) (cos.f64 phi2) (*.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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.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)) #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)))))
#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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))
(-.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))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 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 (*.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 (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 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 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)) #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)))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(*.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 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))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1))))
(*.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)
(*.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))
(*.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)))))
(*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(+.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))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(*.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)))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))
(*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))
#s(literal 1/120 binary64)
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))))
(*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))))
(cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2)))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (fma.f64 #s(literal -2 binary64) phi2 (-.f64 lambda1 lambda2)) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)
(fma.f64 #s(literal -2 binary64) phi2 (-.f64 lambda1 lambda2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
phi2
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
#s(literal 1/2 binary64)
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(sin.f64 (-.f64 lambda1 lambda2))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(-.f64 lambda1 lambda2)
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(*.f64 #s(literal -2 binary64) (-.f64 lambda2 lambda1))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)
(-.f64 lambda2 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 (*.f64 (cos.f64 (-.f64 lambda2 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)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.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 (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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (sin.f64 phi1)) (cos.f64 phi2) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (sin.f64 phi1)) (cos.f64 phi2) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 lambda2)
(cos.f64 lambda1)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)

localize588.0ms (2.1%)

Memory
-1.2MiB live, 1 183.2MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.162441259768442
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy0.20703125
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
accuracy0.21875
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
accuracy13.823871334483671
(sin.f64 (-.f64 lambda1 lambda2))
accuracy13.823871334483671
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
accuracy21.74724657913436
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
accuracy33.33761221480825
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
accuracy36.67592285430124
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
accuracy13.750000000000002
(+.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))))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda2 lambda1))
accuracy13.823871334483671
(sin.f64 (-.f64 lambda1 lambda2))
accuracy32.82458892171282
#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))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda2 lambda1))
accuracy13.823871334483671
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.83070114333379
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy28.964595752402346
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.17482377930532605
(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)))
accuracy0.213222509768442
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
accuracy0.21875
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
accuracy0.23828125
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
Samples
475.0ms243×1valid
12.0ms2valid
6.0ms0valid
Compiler

Compiled 921 to 73 computations (92.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 410.0ms
ival-sin: 108.0ms (26.3% of total)
ival-cos: 102.0ms (24.9% of total)
ival-mult: 85.0ms (20.7% of total)
adjust: 42.0ms (10.2% of total)
ival-sub: 23.0ms (5.6% of total)
ival-atan2: 21.0ms (5.1% of total)
ival-add: 14.0ms (3.4% of total)
const: 11.0ms (2.7% of total)
ival-neg: 3.0ms (0.7% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series137.0ms (0.5%)

Memory
29.2MiB live, 265.0MiB allocated
Counts
26 → 960
Calls
Call 1
Inputs
#s(alt (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (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))) (patch (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))) #<representation binary64>) () ())
#s(alt (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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 (+.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)))) (patch (+.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)))) #<representation binary64>) () ())
#s(alt (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)))) (patch (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)))) #<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 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt #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)) (patch #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)) #<representation binary64>) () ())
#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())
#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
Outputs
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (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))) (patch (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))) #<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 (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))) (patch (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))) #<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 (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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))) (- (* (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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin (* -1 lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 lambda2) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (* (cos phi2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* 1/24 (* (cos lambda2) (* (cos phi2) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<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 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<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 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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))) (- (* (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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 2 (* -2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 2 (* -2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 2 (* -2 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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))))) (- (* (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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2))) (taylor -inf lambda1) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (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))) (patch (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))) #<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 (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))) (patch (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))) #<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 (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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))) (- (* (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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 lambda1) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 lambda2) (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 lambda2) (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 lambda2) (* 2 lambda1)) (taylor 0 lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.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)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* 1/24 (* (cos lambda1) (* (cos phi2) (sin phi1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<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 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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))) (- (* (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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 lambda2) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 2 (/ lambda1 lambda2)) 2)) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 2 (/ lambda1 lambda2)) 2)) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 2 (/ lambda1 lambda2)) 2)) (taylor inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor -inf lambda2) (#s(alt (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)))) (- (* (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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 lambda2) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2))))))))))))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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 (*.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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor 0 phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))) (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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 (*.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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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 (*.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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (- (* 2 lambda1) (* 2 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (- (* 2 lambda1) (* 2 lambda2)) (taylor -inf phi2) (#s(alt (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) (patch (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (patch (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (*.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)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow phi1 2))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (*.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)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 4)) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (*.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)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 4)) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<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)) #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)))) (patch (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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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) (+ (* (cos lambda1) (cos 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (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 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
18.0ms
phi1
@-inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1)))) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (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)) (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) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))
10.0ms
phi2
@-inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1)))) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (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)) (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) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))
9.0ms
lambda1
@-inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1)))) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (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)) (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) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))
8.0ms
lambda2
@-inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1)))) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (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)) (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) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))
7.0ms
phi2
@inf
((+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1)))) (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (atan2 (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (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)) (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) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (* (sin lambda2) (sin lambda1))) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))

simplify238.0ms (0.9%)

Memory
-56.2MiB live, 321.0MiB allocated
Algorithm
egg-herbie
Rules
9 498×lower-fma.f64
9 498×lower-fma.f32
5 954×lower-*.f64
5 954×lower-*.f32
5 358×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075415964
1263815327
2542415299
3793715299
0826414840
Stop Event
iter limit
node limit
Counts
960 → 951
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))))
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin 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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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))) (- (* (cos phi1) (sin phi2)) (* (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))))
(* (cos (* -1 phi2)) (sin (* -1 lambda2)))
(+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(* -1 lambda2)
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -2 lambda2)
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(+ (* (cos lambda2) (* (cos phi2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))))))
(+ (* (cos lambda2) (* (cos phi2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* 1/24 (* (cos lambda2) (* (cos phi2) (sin phi1)))))))))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* 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 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 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(* (cos 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))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 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)))))))))
(* (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))))
(+ (* (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)))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 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))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* 2 lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin 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 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 (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(* (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)))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 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))))) (- (* (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 (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* 2 lambda1)
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin 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 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 (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ 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)))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (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 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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin 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)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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))) (- (* (cos phi1) (sin phi2)) (* (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)))
(* (cos (* -1 phi2)) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 phi2)) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* 2 lambda1)
(+ (* -2 lambda2) (* 2 lambda1))
(+ (* -2 lambda2) (* 2 lambda1))
(+ (* -2 lambda2) (* 2 lambda1))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* (cos lambda1) (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))))))
(+ (* (cos lambda1) (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* 1/24 (* (cos lambda1) (* (cos phi2) (sin phi1)))))))))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(* 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 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 (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(* (cos 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))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(* (cos lambda1) (* (cos 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)))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 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))) (- (* (cos phi1) (sin phi2)) (* (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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -2 lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin 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 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 (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(* (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)))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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 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)))) (- (* (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 (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -2 lambda2)
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin 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 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 (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ 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)))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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))))))))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2)))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2)))))))))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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)))))
(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))))))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (sin phi1)))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))) (* (cos lambda1) (* (cos lambda2) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))) (* 1/24 (* (cos lambda1) (* (cos 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)))))))))
(* (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))))))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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)))))
(* (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)))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (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 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)))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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)))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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)))))
(* (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)))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (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 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)))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* 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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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)))))
1
(+ 1 (* -1/6 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6)))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))))
(* 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))))))))))
(* 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))))))))))
(* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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)))))
(* 1/120 (pow phi1 4))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (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 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 phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin 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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (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)))))
(* 1/120 (pow phi1 4))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (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 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 phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
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) (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)))
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (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) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))))
(* lambda1 (cos lambda2))
(*.f64 lambda1 (cos.f64 lambda2))
(* lambda1 (+ (cos lambda2) (* -1/6 (* (pow lambda1 2) (cos lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 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)))))))
(*.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) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 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) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (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 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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 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) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1 lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 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) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (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)
(* -2 lambda2)
(*.f64 #s(literal -2 binary64) lambda2)
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* -1/2 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* (cos lambda2) (* (cos phi2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) (*.f64 lambda1 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* (cos lambda2) (* (cos phi2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (pow lambda1 2) (+ (* -1/720 (* (pow lambda1 2) (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* 1/24 (* (cos lambda2) (* (cos phi2) (sin phi1)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda1 lambda1) #s(literal 1/24 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* lambda1 (sin lambda2))
(*.f64 (sin.f64 lambda2) lambda1)
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.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) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(* 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 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) (sin.f64 phi1)) (cos.f64 phi2))) 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) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos 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) (sin.f64 phi1)) (cos.f64 phi2))) 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) (sin.f64 phi1)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(sin (* -1 lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 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 (* -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)))
(* (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) (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)))
(+ (* (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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))
(*.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))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
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)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* lambda1 (+ 2 (* -2 (/ lambda2 lambda1))))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos 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 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 (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos 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))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
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)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))
(*.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))))) (- (* (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 (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
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)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* -1 (* lambda1 (- (* 2 (/ lambda2 lambda1)) 2)))
(*.f64 (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 2 binary64)) lambda1)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos 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 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 (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda2 (* -1 lambda1)))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos 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))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
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)
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (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 (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 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (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 (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/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))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))))
(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) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 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/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))
(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)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 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/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))
(* (cos (* -1 phi2)) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1)))
(*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 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 (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 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/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))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* 2 lambda1)
(*.f64 #s(literal 2 binary64) lambda1)
(+ (* -2 lambda2) (* 2 lambda1))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(+ (* -2 lambda2) (* 2 lambda1))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(+ (* -2 lambda2) (* 2 lambda1))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* -1/2 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* 1/24 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.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 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* (cos lambda1) (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* 1/24 (* (cos lambda1) (* (cos phi2) (sin phi1)))))))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (*.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 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(* lambda2 (sin lambda1))
(*.f64 (sin.f64 lambda1) lambda2)
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) 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 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 (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 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos 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 (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 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2 (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 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))
(* (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 (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 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) 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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))
(*.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))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) 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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -2 lambda2)
(*.f64 #s(literal -2 binary64) lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* lambda2 (- (* 2 (/ lambda1 lambda2)) 2))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos 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 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 (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos 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))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))
(*.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)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) 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 (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -2 lambda2)
(*.f64 #s(literal -2 binary64) lambda2)
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* -1 (* lambda2 (+ 2 (* -2 (/ lambda1 lambda2)))))
(*.f64 (fma.f64 (/.f64 lambda1 lambda2) #s(literal 2 binary64) #s(literal -2 binary64)) lambda2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos 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 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 (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos 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))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 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))))))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 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)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 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))))))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda1))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal -1/24 binary64) (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 phi2 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/24 binary64) (cos.f64 lambda1)) (sin.f64 lambda2) (fma.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/720 binary64) (cos.f64 lambda1)) (sin.f64 lambda2))) (*.f64 phi2 phi2)))) (*.f64 phi2 phi2) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda1)))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))
(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)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 lambda1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))) (* (cos lambda1) (* (cos lambda2) (sin phi1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))))))
(fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 lambda1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda1) (* (cos lambda2) (sin phi1))))) (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 lambda1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))) (*.f64 phi2 phi2) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 lambda1)))
(* (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))))
(* (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)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))
(* (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))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 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 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))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))
(* (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))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(* 1/2 (- (* 2 lambda1) (* 2 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(- (* 2 lambda1) (* 2 lambda2))
(*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 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 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))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 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)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) 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/6 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) 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 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) phi1)
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))
1
#s(literal 1 binary64)
(+ 1 (* -1/6 (pow phi1 2)))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6)))
(fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6)))
(fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* phi1 (* (cos lambda1) (* (cos lambda2) (cos phi2))))
(*.f64 (*.f64 phi1 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda1) (* (cos lambda2) (cos phi2))))) (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.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 (cos.f64 lambda1) (cos.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 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #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 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #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)
(* 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 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #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 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #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 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #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 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #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) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.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 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) 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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))
(* 1/120 (pow phi1 4))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 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 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 phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))
(atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (-.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))))
(* 1/120 (pow phi1 4))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 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 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 phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))

rewrite245.0ms (0.9%)

Memory
18.2MiB live, 335.3MiB allocated
Rules
4 678×lower-*.f32
4 632×lower-*.f64
4 214×lower-fma.f32
4 208×lower-fma.f64
2 876×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
079464
0142438
1496404
23994392
08211386
Stop Event
iter limit
node limit
iter limit
Counts
26 → 478
Calls
Call 1
Inputs
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(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)))
(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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(+.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))))
(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))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
#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))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
Outputs
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(pow.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (neg.f64 lambda2))) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(literal 2 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)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(fma.f64 (*.f64 (cos.f64 lambda1) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))
(*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 lambda2 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(pow.f64 (/.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)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (neg.f64 lambda2) #s(literal 2 binary64))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (neg.f64 lambda2) #s(literal 3 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (pow.f64 (neg.f64 lambda2) #s(literal 2 binary64)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64)))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))))
(/.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)))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(fma.f64 lambda2 #s(literal -1 binary64) lambda1)
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(*.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))) (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64))) (pow.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 phi1 #s(literal 6 binary64)) (pow.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))))
(/.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))))))
(/.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))) (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) phi1)) phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal 1/120 binary64)) phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64)) #s(literal -1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))
(fma.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 phi1 #s(literal 6 binary64)) #s(literal 1 binary64)) (pow.f64 (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)))) #s(literal -1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 phi1 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 phi1 (*.f64 (*.f64 #s(literal -1/6 binary64) phi1) #s(literal 1 binary64)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 phi1 (*.f64 #s(literal -1/6 binary64) phi1) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 phi1 (*.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))) (/.f64 (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))))
(+.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) #s(literal 1 binary64))
(+.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(+.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(+.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 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 (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) #s(literal -1 binary64)))
(*.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))))))
(/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (-.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(+.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(literal 2 binary64))
(*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(literal 1 binary64))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))))
(*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))))
(fma.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64) (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) phi2))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1)) (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) (pow.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) (pow.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (-.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 2 binary64))) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(/.f64 (+.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 2 binary64)) (-.f64 (*.f64 phi2 phi2) (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))))
(/.f64 (+.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (+.f64 lambda2 phi2)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (*.f64 (+.f64 lambda2 phi2) (-.f64 lambda2 phi2)))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (+.f64 lambda2 phi2)))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (fma.f64 lambda2 lambda2 (*.f64 phi2 (+.f64 lambda2 phi2)))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))))) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (fma.f64 lambda2 lambda2 (*.f64 phi2 (+.f64 lambda2 phi2)))))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64))) (+.f64 lambda2 phi2)) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (*.f64 (+.f64 lambda2 phi2) (-.f64 lambda2 phi2)))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (+.f64 lambda2 phi2)))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64))) (fma.f64 lambda2 lambda2 (*.f64 phi2 (+.f64 lambda2 phi2)))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))))) (*.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) (fma.f64 lambda2 lambda2 (*.f64 phi2 (+.f64 lambda2 phi2)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64))) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64))) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (-.f64 lambda1 (-.f64 lambda2 phi2)))
(fma.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda2 phi2)))
(fma.f64 #s(literal -1 binary64) (-.f64 lambda2 phi2) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 lambda1 (-.f64 lambda2 phi2)))
(fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(fma.f64 (+.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda1 (-.f64 lambda1 (-.f64 (-.f64 lambda1 lambda2) phi2)) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (-.f64 lambda2 phi2)))
(-.f64 (/.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)) (/.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 2 binary64)) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)))
(-.f64 (/.f64 (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))) (/.f64 (pow.f64 (-.f64 lambda2 phi2) #s(literal 3 binary64)) (fma.f64 (-.f64 lambda2 phi2) (-.f64 (+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 2 binary64)))))
(-.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) (neg.f64 phi2))
(-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2))
(-.f64 (-.f64 lambda1 lambda2) (+.f64 (-.f64 phi2 lambda1) (-.f64 lambda2 phi2)))
(-.f64 (-.f64 lambda1 lambda2) (-.f64 (-.f64 phi2 lambda1) (neg.f64 (-.f64 lambda2 phi2))))
(-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(-.f64 lambda1 (-.f64 (+.f64 lambda2 phi2) (-.f64 lambda1 (-.f64 lambda2 phi2))))
(+.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) phi2)
(+.f64 (neg.f64 (-.f64 lambda2 phi2)) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))
(+.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) (-.f64 (-.f64 lambda1 lambda2) phi2))
(+.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (neg.f64 (-.f64 lambda2 phi2)))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda1 (-.f64 lambda2 phi2)))
(+.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal -1 binary64) phi2 (-.f64 lambda1 (-.f64 lambda2 phi2))))
(+.f64 lambda1 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 lambda2 phi2)))
(+.f64 lambda1 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (-.f64 lambda2 phi2))))
(+.f64 phi2 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))
(*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(literal 1/2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (*.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(fma.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64) (*.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (*.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda2))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
(*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 4 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
(*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(*.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 4 binary64))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (neg.f64 (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) #s(literal 2 binary64))) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64))) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal -1 binary64)) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(fma.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(fma.f64 #s(literal -1 binary64) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))) (/.f64 (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))
(-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(-.f64 (-.f64 lambda1 lambda2) (+.f64 phi2 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(-.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 #s(literal 2 binary64) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(-.f64 lambda1 (+.f64 (+.f64 lambda2 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(+.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))
(+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (neg.f64 phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(+.f64 (-.f64 lambda1 lambda2) (-.f64 (neg.f64 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(fma.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))))
(sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 lambda2 phi2))))))
(+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 (-.f64 lambda2 phi2))))))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(pow.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))) (neg.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2)))

eval346.0ms (1.2%)

Memory
33.7MiB live, 721.1MiB allocated
Compiler

Compiled 83 916 to 4 614 computations (94.5% saved)

prune471.0ms (1.7%)

Memory
-6.7MiB live, 766.5MiB allocated
Pruning

109 alts after pruning (108 fresh and 1 done)

PrunedKeptTotal
New1 837531 890
Fresh225577
Picked415
Done000
Total1 8631091 972
Accuracy
99.9%
Counts
1 972 → 109
Alt Table
Click to see full alt table
StatusAccuracyProgram
51.1%
(atan2.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.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 (*.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))))
99.8%
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
99.8%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
99.8%
(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)) (fma.f64 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))))
77.1%
(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 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
80.1%
(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) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)))) #s(literal 2 binary64))))
81.0%
(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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
78.5%
(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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
55.9%
(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)) #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))))
76.5%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
89.9%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
83.0%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) #s(approx (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
69.3%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) #s(approx (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (*.f64 (neg.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)))))
82.4%
(atan2.f64 (fma.f64 #s(approx (* (cos lambda2) (sin lambda1)) (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)))))
77.9%
(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)))))
47.1%
(atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
81.1%
(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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
51.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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))))
89.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.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)))))
51.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.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 (*.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))))
62.3%
(atan2.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 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)))))
77.8%
(atan2.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (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 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
46.9%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (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)))))
31.8%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 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)))))
79.3%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.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)))))
65.8%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
46.5%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) #s(approx (sin (+ lambda2 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)))))
46.1%
(atan2.f64 (*.f64 (*.f64 (*.f64 #s(approx (sin (+ lambda2 lambda1)) (sin.f64 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)))))
41.9%
(atan2.f64 (*.f64 (*.f64 #s(approx (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (pow.f64 (sin.f64 lambda1) #s(literal 2 binary64))) (/.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)))))
42.5%
(atan2.f64 (*.f64 (*.f64 #s(approx (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 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)))))
27.1%
(atan2.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))) (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))))
25.8%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.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))))
76.0%
(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)))))
71.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2)))) (sin.f64 phi1)) #s(literal 2 binary64))))
81.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
81.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))))))))
81.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal -1 binary64)))))
69.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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
41.3%
(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 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 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))))
43.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 (*.f64 (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (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))))
67.9%
(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))))))
77.1%
(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)))))
40.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)) (cos.f64 (-.f64 lambda1 lambda2)))))
68.0%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
65.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.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)))))
41.5%
(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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
48.3%
(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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
48.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
37.0%
(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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
48.1%
(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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
31.4%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
29.3%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 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))))))
40.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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))))))
49.6%
(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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
22.4%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (fma.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
44.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
45.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
42.2%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
46.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (-.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.4%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
44.2%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 1/2 binary64)))) #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)))))
38.2%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))
40.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
42.7%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 #s(approx (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (neg.f64 lambda2)))) #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)))))
35.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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)))))
39.0%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 (+.f64 (+.f64 lambda2 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
46.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
46.5%
(atan2.f64 #s(approx (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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)))))
47.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) (-.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))))))
55.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 (*.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.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 (*.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))))
46.5%
(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 (*.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))))))
43.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.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))))))
32.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1)))) (-.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))))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.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))))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.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.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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
50.4%
(atan2.f64 #s(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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
44.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)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
41.5%
(atan2.f64 #s(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 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))))))
45.4%
(atan2.f64 #s(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)))))
44.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) (cos.f64 phi2)) #s(approx (cos (- 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)) #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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
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 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
27.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 (*.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))))
30.6%
(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))))))
50.0%
(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) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
50.1%
(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) (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)))))))
50.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 (sin.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
50.3%
(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) (/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1)))))))))
50.3%
(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))))))
41.3%
(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) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2)))))))
41.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) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))))
45.5%
(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) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))))
44.0%
(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) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))
41.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
43.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
44.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) 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))))))
40.8%
(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 (*.f64 (cos.f64 phi1) (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 #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.9%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
41.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #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)))) (-.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.8%
(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 (*.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.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 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))))))
34.9%
(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)))))
34.7%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
81.4%
#s(approx (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
Compiler

Compiled 7 456 to 5 257 computations (29.5% saved)

simplify134.0ms (0.5%)

Memory
15.7MiB live, 166.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
cost-diff0
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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))))
cost-diff6272
(+.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))))
cost-diff0
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))
cost-diff0
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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)))))
cost-diff192
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))
cost-diff640
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)))
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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
cost-diff512
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
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 (*.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))))))
cost-diff0
(neg.f64 (sin.f64 lambda2))
cost-diff0
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
cost-diff0
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
cost-diff6720
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
Rules
10 892×lower-fma.f32
10 884×lower-fma.f64
3 330×lower-*.f32
3 288×lower-*.f64
2 570×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0921054
01611042
12881036
27311010
32361994
45514958
57042950
08022940
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
(cos.f64 lambda2)
(-.f64 (*.f64 (cos.f64 phi1) (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)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(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))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.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 (*.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))))))
#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 (*.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)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
#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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
(sin.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
#s(literal 2 binary64)
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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)))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))
(*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)))
(cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
phi2
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
#s(literal 1/2 binary64)
#s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))
(sin.f64 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)
(*.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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 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))))
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(sin.f64 lambda1)
(cos.f64 lambda2)
(cos.f64 phi2)
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)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
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))
(*.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)
(*.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)))))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(+.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))))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
(*.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)))
(*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))
#s(literal 1/120 binary64)
Outputs
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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 (*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda1)
(cos.f64 lambda2)
(-.f64 (*.f64 (cos.f64 phi1) (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)))))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) (cos.f64 phi2) (*.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.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)) #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) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) (-.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)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
#s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))
(sin.f64 lambda1)
lambda1
(-.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)))))
(-.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))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
#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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1/2 binary64) (*.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)
phi2
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(*.f64 (/.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 2 binary64)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(+.f64 phi1 phi2)
(sin.f64 (-.f64 phi1 phi2))
(-.f64 phi1 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
#s(literal 2 binary64)
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2)))) (fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)))
(*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))))
#s(literal 2 binary64)
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #s(literal 1/2 binary64)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))))
(*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)))
(*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))))
(cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(cos.f64 (fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2)))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))
(fma.f64 (-.f64 (-.f64 lambda1 lambda2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64) (neg.f64 phi2))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (fma.f64 #s(literal -2 binary64) phi2 (-.f64 lambda1 lambda2)) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)
(fma.f64 #s(literal -2 binary64) phi2 (-.f64 lambda1 lambda2))
(-.f64 (-.f64 lambda1 lambda2) phi2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
phi2
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(neg.f64 lambda2)
#s(literal 1/2 binary64)
#s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))
(sin.f64 lambda1)
(-.f64 (*.f64 (cos.f64 phi1) (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) (*.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)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 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 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1))))))
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(*.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 lambda2)
lambda2
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda1)
(cos.f64 lambda2)
(cos.f64 phi2)
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)))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))))
(*.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 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))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1))))
(*.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)
(*.f64 (*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))) (cos.f64 (-.f64 lambda2 lambda1)))
(*.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)))))
(*.f64 (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(+.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))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1 #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
(*.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)))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))
(*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))
#s(literal 1/120 binary64)

localize744.0ms (2.7%)

Memory
-3.8MiB live, 1 219.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.2940749200024856
(*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))
accuracy13.750000000000002
(+.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))))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda2 lambda1))
accuracy32.82458892171282
#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))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda1 lambda2))
accuracy33.33761221480825
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
accuracy36.67592285430124
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
accuracy37.32289008719617
#s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))
accuracy16.016325017927027
(sin.f64 (-.f64 phi1 phi2))
accuracy16.176309438537256
(sin.f64 (+.f64 phi1 phi2))
accuracy20.70861077087725
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
accuracy28.964595752402346
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy13.820812009760523
(cos.f64 (-.f64 lambda2 lambda1))
accuracy28.83070114333379
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy28.964595752402346
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
accuracy37.32289008719617
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0.1542650511575378
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
accuracy0.1640625
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))
accuracy0.20703125
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
accuracy0.21875
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
Samples
598.0ms244×1valid
26.0ms2valid
2.0ms0valid
Compiler

Compiled 896 to 81 computations (91% saved)

Precisions
Click to see histograms. Total time spent on operations: 503.0ms
ival-sin: 149.0ms (29.6% of total)
ival-cos: 106.0ms (21.1% of total)
ival-mult: 93.0ms (18.5% of total)
adjust: 60.0ms (11.9% of total)
ival-atan2: 27.0ms (5.4% of total)
ival-sub: 26.0ms (5.2% of total)
ival-add: 18.0ms (3.6% of total)
const: 12.0ms (2.4% of total)
ival-neg: 7.0ms (1.4% of total)
ival-div: 3.0ms (0.6% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series138.0ms (0.5%)

Memory
6.9MiB live, 322.1MiB allocated
Counts
34 → 1 104
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())
#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())
#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())
#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #<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 (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())
#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())
#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())
#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())
#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())
#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())
#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())
#s(alt #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)) (patch #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)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())
Outputs
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (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 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (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 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* 1/2 (* (pow lambda1 2) (sin lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (sin lambda2))) (* 1/2 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow lambda1 2) (sin lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #<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 (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin (* -1 lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* 1/2 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* lambda1 (+ (* 1/2 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* lambda1 (+ (* -1/4 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/12 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos lambda2) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow lambda1 2) (* (cos lambda2) (cos phi2)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos lambda2) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1 lambda2)) (* lambda1 (cos (* -1 lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 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 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 (* (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 (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda1) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 (* (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 (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda1) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.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 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.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 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (cos lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (* 1/6 (* (pow lambda2 2) (cos lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos lambda1))) (* 1/6 (cos lambda1)))))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* 1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (cos lambda1)) (* 1/5040 (* (pow lambda2 2) (cos lambda1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* 1/6 (pow lambda2 2)) 1)) (taylor 0 lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1)) (taylor 0 lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1)) (taylor 0 lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.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 lambda2) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #<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 (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor 0 lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* 1/2 (* (cos (* -1 phi2)) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/4 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/4 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/12 (* lambda2 (* (cos lambda1) (cos (* -1 phi2)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.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 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.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)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin lambda1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/24 (* (cos phi2) (sin lambda1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda1)) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (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) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (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) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.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 lambda2) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 (* (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 (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 lambda1)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos lambda1) (sin lambda2))) (taylor -inf lambda2) (#s(alt (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (patch (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor -inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor -inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor -inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor -inf lambda2) (#s(alt (neg.f64 (sin.f64 lambda2)) (patch (neg.f64 (sin.f64 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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 (* (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 (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor -inf lambda2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (taylor -inf lambda2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (patch (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (sin lambda2)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda2 lambda1)) (patch (cos.f64 (-.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))) (taylor -inf lambda2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf lambda2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (patch #s(approx (- lambda1 lambda2) (neg.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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2))))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #<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 (* -1 (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor 0 phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/4 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/48 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/4 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/1440 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/48 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1)))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin lambda1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (cos lambda2) (sin lambda1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* 2 (sin phi1)) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (* -1 (cos phi1))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* -1 (* phi2 (sin phi1))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* phi2 (+ (* -1 (sin phi1)) (* phi2 (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1)))))))))) (taylor 0 phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* phi2 (cos phi1))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* phi2 (+ (cos phi1) (* -1/2 (* phi2 (sin phi1)))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* phi2 (+ (cos phi1) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/6 (* phi2 (cos phi1)))))))) (taylor 0 phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin phi1) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* -1 (* phi2 (cos phi1)))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* phi2 (+ (* -1 (cos phi1)) (* -1/2 (* phi2 (sin phi1)))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi1) (* phi2 (+ (* -1 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* 1/6 (* phi2 (cos phi1)))))))) (taylor 0 phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor 0 phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor 0 phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor 0 phi2) (#s(alt #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 (* (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 phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (patch (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 (* (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 phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))) (taylor -inf phi2) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<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 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 phi2) (taylor -inf phi2) (#s(alt (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) (patch (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) (patch (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (patch (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))) (taylor -inf phi2) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 (* -1 phi2))) (taylor -inf phi2) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (taylor -inf phi2) (#s(alt #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (patch #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -2 phi2) (taylor -inf phi2) (#s(alt (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (patch (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (- (sin phi2) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2)))))) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2)))))) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2)))))) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2)))))) (taylor 0 phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/6 (pow phi1 2))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6))) (taylor 0 phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 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 #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (sin (neg phi2))) (taylor 0 phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (cos (neg phi2)))))) (taylor 0 phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))))) (taylor 0 phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2))))))))))))) (taylor 0 phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (sin phi2) (taylor 0 phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* phi1 (cos phi2))) (taylor 0 phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* phi1 (+ (cos phi2) (* -1/2 (* phi1 (sin phi2)))))) (taylor 0 phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin phi2) (* phi1 (+ (cos phi2) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/6 (* phi1 (cos phi2)))))))) (taylor 0 phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg phi2)) (taylor 0 phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg phi2)) (* phi1 (cos (neg phi2)))) (taylor 0 phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg phi2)) (* phi1 (+ (cos (neg phi2)) (* -1/2 (* phi1 (sin (neg phi2))))))) (taylor 0 phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg phi2)) (* phi1 (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* -1/6 (* phi1 (cos (neg phi2))))))))) (taylor 0 phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<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 #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor 0 phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (taylor inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 4)) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (taylor inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi1 phi2)) (taylor inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) (patch (atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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)))))) #<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 (*.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)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.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 phi1) (#s(alt (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (patch (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))) (taylor -inf phi1) (#s(alt (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (patch (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) (patch (atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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))))) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 4)) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2))))) (taylor -inf phi1) (#s(alt (+.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)))) (patch (+.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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) (patch (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) (patch #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (patch (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- phi2 (* -1 phi1))) (taylor -inf phi1) (#s(alt (sin.f64 (+.f64 phi1 phi2)) (patch (sin.f64 (+.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ phi2 (* -1 phi1)))) (taylor -inf phi1) (#s(alt (sin.f64 (-.f64 phi1 phi2)) (patch (sin.f64 (-.f64 phi1 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt #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)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
#s(alt (* 1/120 (pow phi1 2)) (taylor -inf phi1) (#s(alt (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (patch (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
9.0ms
lambda1
@inf
((+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (atan2 (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (neg (sin lambda2)) (cos lambda1)) (neg (sin lambda2)) (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) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (* (sin lambda1) (cos lambda2)) (cos phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (sin (+ phi1 phi2)) (sin (- phi1 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* 1/120 (* phi1 phi1)))
8.0ms
phi2
@-inf
((+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (atan2 (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (neg (sin lambda2)) (cos lambda1)) (neg (sin lambda2)) (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) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (* (sin lambda1) (cos lambda2)) (cos phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (sin (+ phi1 phi2)) (sin (- phi1 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* 1/120 (* phi1 phi1)))
8.0ms
lambda2
@inf
((+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (atan2 (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (neg (sin lambda2)) (cos lambda1)) (neg (sin lambda2)) (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) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (* (sin lambda1) (cos lambda2)) (cos phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (sin (+ phi1 phi2)) (sin (- phi1 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* 1/120 (* phi1 phi1)))
8.0ms
phi2
@inf
((+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (atan2 (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (neg (sin lambda2)) (cos lambda1)) (neg (sin lambda2)) (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) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (* (sin lambda1) (cos lambda2)) (cos phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (sin (+ phi1 phi2)) (sin (- phi1 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* 1/120 (* phi1 phi1)))
7.0ms
lambda1
@-inf
((+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (atan2 (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))))) (* (neg (sin lambda2)) (cos lambda1)) (neg (sin lambda2)) (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) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2) (atan2 (* 2 (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (cos (* (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) 1/2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2))) 1/2) (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (atan2 (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (cos phi2)) (+ (* (sin lambda2) (neg (cos lambda1))) (* (sin lambda1) (cos lambda2))) (* (sin lambda2) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (cos lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (* (* (sin lambda1) (cos lambda2)) (cos phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (sin (+ phi1 phi2)) (sin (- phi1 phi2)) (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (- (- (- (- lambda1 lambda2) phi2) phi2) (- lambda1 lambda2)) (- lambda1 lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* 1/120 (* phi1 phi1)))

simplify222.0ms (0.8%)

Memory
24.0MiB live, 307.8MiB allocated
Algorithm
egg-herbie
Rules
8 976×lower-fma.f64
8 976×lower-fma.f32
5 886×lower-*.f64
5 886×lower-*.f32
5 688×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
097118337
1341517639
2729917487
0820516991
Stop Event
iter limit
node limit
Counts
1 104 → 1 100
Calls
Call 1
Inputs
(* -1 (* (cos phi2) (sin lambda2)))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* -1 (sin lambda2))
(+ (* -1 (sin lambda2)) (* 1/2 (* (pow lambda1 2) (sin lambda2))))
(+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (sin lambda2))) (* 1/2 (sin lambda2)))))
(+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow lambda1 2) (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))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* 1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 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))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(* (cos (* -1 phi2)) (sin (* -1 lambda2)))
(+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(+ (* 1/2 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* 1/2 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))))))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* lambda1 (+ (* 1/2 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* lambda1 (+ (* -1/4 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/12 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (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))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(* lambda1 (sin lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* (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))))
(* lambda1 (* (cos lambda2) (cos phi2)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2))))
(* lambda1 (+ (* (cos lambda2) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow lambda1 2) (* (cos lambda2) (cos phi2))))))))
(* lambda1 (+ (* (cos lambda2) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2)))))))))
(* (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 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(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)))))))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (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)
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (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 (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
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)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (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)
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 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)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin 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 (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(cos (+ lambda2 (* -1 lambda1)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
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)))
(* (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 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* -1 (* lambda2 (cos lambda1)))
(* lambda2 (+ (* -1 (cos lambda1)) (* 1/6 (* (pow lambda2 2) (cos lambda1)))))
(* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))
(* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* 1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (cos lambda1)) (* 1/5040 (* (pow lambda2 2) (cos lambda1)))))))))
(* -1 lambda2)
(* lambda2 (- (* 1/6 (pow lambda2 2)) 1))
(* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))
(* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 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))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* -1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (+ (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(* (cos (* -1 phi2)) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 phi2)) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1)))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin lambda1)))
(+ (* -1/2 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/4 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/4 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/12 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (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))))))))
(* lambda2 (sin lambda1))
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(* (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 phi2) (sin lambda1))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))
(+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))))))
(+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/24 (* (cos phi2) (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 (neg lambda1))
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(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))))))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
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))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (sin lambda2))
(* -1 (sin lambda2))
(* -1 (sin lambda2))
(* -1 (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))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (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 (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(cos (- lambda2 lambda1))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -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)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (* (cos lambda1) (sin lambda2)))
(* -1 (sin lambda2))
(* -1 (sin lambda2))
(* -1 (sin lambda2))
(* -1 (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)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (sin lambda1) (sin lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (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 (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos (neg (+ lambda1 (* -1 lambda2))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -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)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2)))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2)))))))))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin 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))))))))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 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))))))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(+ (* -1/4 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(+ (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/4 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/48 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))
(+ (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/4 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/1440 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/48 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* (cos lambda2) (sin lambda1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))) (* (cos lambda2) (sin lambda1)))
(+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))))))
(+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))
(* (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))))))))
(* 2 (sin phi1))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (* -1 (cos phi1)))))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* -1 (* phi2 (sin phi1)))))))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* phi2 (+ (* -1 (sin phi1)) (* phi2 (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))))))
(sin phi1)
(+ (sin phi1) (* phi2 (cos phi1)))
(+ (sin phi1) (* phi2 (+ (cos phi1) (* -1/2 (* phi2 (sin phi1))))))
(+ (sin phi1) (* phi2 (+ (cos phi1) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/6 (* phi2 (cos phi1))))))))
(sin phi1)
(+ (sin phi1) (* -1 (* phi2 (cos phi1))))
(+ (sin phi1) (* phi2 (+ (* -1 (cos phi1)) (* -1/2 (* phi2 (sin phi1))))))
(+ (sin phi1) (* phi2 (+ (* -1 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* 1/6 (* phi2 (cos phi1))))))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* (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))))))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin 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)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (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)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(sin (+ phi1 phi2))
(sin (+ phi1 phi2))
(sin (+ phi1 phi2))
(sin (+ phi1 phi2))
(sin (- phi1 phi2))
(sin (- phi1 phi2))
(sin (- phi1 phi2))
(sin (- phi1 phi2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 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)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin 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)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(* -1 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (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)))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(sin (- phi1 (* -1 phi2)))
(sin (- phi1 (* -1 phi2)))
(sin (- phi1 (* -1 phi2)))
(sin (- phi1 (* -1 phi2)))
(sin (+ phi1 (* -1 phi2)))
(sin (+ phi1 (* -1 phi2)))
(sin (+ phi1 (* -1 phi2)))
(sin (+ phi1 (* -1 phi2)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(* -2 phi2)
(* -2 phi2)
(* -2 phi2)
(* -2 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)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin 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 phi2) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
1
(+ 1 (* -1/6 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6)))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos 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 (neg phi2)))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (cos (neg phi2))))))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2))))))))))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))))))))
(sin phi2)
(+ (sin phi2) (* phi1 (cos phi2)))
(+ (sin phi2) (* phi1 (+ (cos phi2) (* -1/2 (* phi1 (sin phi2))))))
(+ (sin phi2) (* phi1 (+ (cos phi2) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/6 (* phi1 (cos phi2))))))))
(sin (neg phi2))
(+ (sin (neg phi2)) (* phi1 (cos (neg phi2))))
(+ (sin (neg phi2)) (* phi1 (+ (cos (neg phi2)) (* -1/2 (* phi1 (sin (neg phi2)))))))
(+ (sin (neg phi2)) (* phi1 (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* -1/6 (* phi1 (cos (neg 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))))))))))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin 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 phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/120 (pow phi1 4))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(sin (+ phi1 phi2))
(sin (+ phi1 phi2))
(sin (+ phi1 phi2))
(sin (+ phi1 phi2))
(sin (- phi1 phi2))
(sin (- phi1 phi2))
(sin (- phi1 phi2))
(sin (- phi1 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)))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin 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 phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 1/120 (pow phi1 4))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos 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)))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(sin (- phi2 (* -1 phi1)))
(sin (- phi2 (* -1 phi1)))
(sin (- phi2 (* -1 phi1)))
(sin (- phi2 (* -1 phi1)))
(sin (neg (+ phi2 (* -1 phi1))))
(sin (neg (+ phi2 (* -1 phi1))))
(sin (neg (+ phi2 (* -1 phi1))))
(sin (neg (+ phi2 (* -1 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)))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
(* 1/120 (pow phi1 2))
Outputs
(* -1 (* (cos phi2) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (* -1 (sin lambda2)) (* 1/2 (* (pow lambda1 2) (sin lambda2))))
(*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/2 binary64) (*.f64 lambda1 lambda1) #s(literal -1 binary64)))
(+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (* (pow lambda1 2) (sin lambda2))) (* 1/2 (sin lambda2)))))
(fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/24 binary64) (*.f64 lambda1 lambda1) #s(literal 1/2 binary64))) (*.f64 lambda1 lambda1) (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/24 (sin lambda2)) (* 1/720 (* (pow lambda1 2) (sin lambda2))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/720 binary64) (*.f64 lambda1 lambda1) #s(literal -1/24 binary64))) (*.f64 lambda1 lambda1) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) (*.f64 lambda1 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 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (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 lambda2) (cos.f64 phi2)))) lambda1) lambda1 (*.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) (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 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.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)
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (+ (* 1/2 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (neg.f64 (sin.f64 lambda2))) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (+ (* lambda1 (- (* 1/4 (* lambda1 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda1) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 lambda2)))) lambda1 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (+ (* lambda1 (- (* lambda1 (- (* -1/12 (* lambda1 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* -1/2 (* (sin (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos (neg lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (sin.f64 lambda2)) #s(literal -1/2 binary64) (*.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (neg.f64 (sin.f64 lambda2))))) lambda1)) lambda1 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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) (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 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(fma.f64 (*.f64 (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 lambda2) (cos.f64 phi2)))) lambda1) lambda1 (*.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) (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 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* (cos (* -1 phi2)) (sin (* -1 lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 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) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/6 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))) (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* (cos (* -1 phi2)) (sin (* -1 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 lambda2) (cos.f64 phi2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(+ (* 1/2 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))) (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* lambda1 (+ (* -1/4 (* lambda1 (* (cos (* -1 phi2)) (sin (* -1 lambda2))))) (* 1/2 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* lambda1 (+ (* 1/2 (* (cos (* -1 lambda2)) (cos (* -1 phi2)))) (* lambda1 (+ (* -1/4 (* (cos (* -1 phi2)) (sin (* -1 lambda2)))) (* -1/12 (* lambda1 (* (cos (* -1 lambda2)) (cos (* -1 phi2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/12 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (+ (* lambda1 (+ (* -1/6 (* lambda1 (* (cos lambda2) (cos phi2)))) (* 1/2 (* (cos phi2) (sin lambda2))))) (* (cos lambda2) (cos phi2)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2)))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* lambda1 (+ (* -1/6 (* lambda1 (cos lambda2))) (* 1/2 (sin lambda2)))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* lambda1 (sin lambda2))
(*.f64 lambda1 (sin.f64 lambda2))
(* lambda1 (+ (sin lambda2) (* -1/6 (* (pow lambda1 2) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow lambda1 2) (sin lambda2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(* lambda1 (+ (sin lambda2) (* (pow lambda1 2) (+ (* -1/6 (sin lambda2)) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.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) (sin.f64 lambda2))) (*.f64 lambda1 lambda1) (sin.f64 lambda2)) lambda1)
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2))
(+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+ (* 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 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(* lambda1 (* (cos lambda2) (cos phi2)))
(*.f64 (*.f64 lambda1 (cos.f64 phi2)) (cos.f64 lambda2))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2))))
(*.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1)
(* lambda1 (+ (* (cos lambda2) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow lambda1 2) (* (cos lambda2) (cos phi2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))) lambda1)
(* lambda1 (+ (* (cos lambda2) (cos phi2)) (* (pow lambda1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (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 (cos.f64 lambda2) (cos.f64 phi2))) lambda1)
(* (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 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+ (* 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 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* -1/6 (* lambda1 (sin lambda2))))) (* -1 (sin lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal -1/6 binary64) (*.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))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (* -1 lambda2)) (* lambda1 (+ (cos (* -1 lambda2)) (* -1/2 (* lambda1 (sin (* -1 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 (* -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 (cos.f64 lambda2) lambda1) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 lambda2))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -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 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #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 lambda2)) (cos.f64 phi2))
(+ (* -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 phi1) (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+ (* 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 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2))) 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 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2))) lambda1 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (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)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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)
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
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)
(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) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.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 lambda1 lambda2))) (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 lambda1 lambda2))) (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 lambda1 lambda2))) (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 lambda1 lambda2))) (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)
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (neg (+ lambda2 (* -1 lambda1)))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(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))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(sin (* -1/2 (+ (* -2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (fma.f64 #s(literal -2 binary64) lambda1 (*.f64 #s(literal 2 binary64) lambda2)) #s(literal -1/2 binary64)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
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)
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (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 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* -1 (* lambda2 (cos lambda1)))
(*.f64 (neg.f64 (cos.f64 lambda1)) lambda2)
(* lambda2 (+ (* -1 (cos lambda1)) (* 1/6 (* (pow lambda2 2) (cos lambda1)))))
(*.f64 (*.f64 (cos.f64 lambda1) (fma.f64 (*.f64 lambda2 lambda2) #s(literal 1/6 binary64) #s(literal -1 binary64))) lambda2)
(* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (* (pow lambda2 2) (cos lambda1))) (* 1/6 (cos lambda1))))))
(*.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 #s(literal -1/120 binary64) (*.f64 lambda2 lambda2) #s(literal 1/6 binary64))) (*.f64 lambda2 lambda2) (neg.f64 (cos.f64 lambda1))) lambda2)
(* lambda2 (+ (* -1 (cos lambda1)) (* (pow lambda2 2) (+ (* 1/6 (cos lambda1)) (* (pow lambda2 2) (+ (* -1/120 (cos lambda1)) (* 1/5040 (* (pow lambda2 2) (cos lambda1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) (fma.f64 #s(literal 1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal -1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal 1/6 binary64) (cos.f64 lambda1))) (*.f64 lambda2 lambda2) (neg.f64 (cos.f64 lambda1))) lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (* 1/6 (pow lambda2 2)) 1))
(*.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal 1/6 binary64) #s(literal -1 binary64)) lambda2)
(* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* -1/120 (pow lambda2 2)))) 1))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/120 binary64) (*.f64 lambda2 lambda2) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal -1 binary64)) lambda2)
(* lambda2 (- (* (pow lambda2 2) (+ 1/6 (* (pow lambda2 2) (- (* 1/5040 (pow lambda2 2)) 1/120)))) 1))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal -1/120 binary64)) (*.f64 lambda2 lambda2) #s(literal 1/6 binary64)) (*.f64 lambda2 lambda2) #s(literal -1 binary64)) 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 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) 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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (+ (* -1/2 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (sin.f64 lambda1)) (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (+ (* lambda2 (- (* 1/4 (* lambda2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (sin.f64 lambda1)) #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 1/4 binary64) lambda2) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 lambda1)))) lambda2 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (+ (* lambda2 (- (* lambda2 (- (* 1/12 (* lambda2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))) (* -1/4 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* 1/2 (* (sin lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))) (* (cos phi1) (sin phi2))) (* 1/2 (* (cos lambda1) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/4 binary64) (cos.f64 lambda1)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (sin.f64 lambda1)))) lambda2 (*.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (sin.f64 lambda1)) #s(literal -1/2 binary64))) lambda2 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) 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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(* (cos (* -1 phi2)) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* (cos (* -1 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 (* -1 phi2)))) (* -1/2 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))) (* (cos (* -1 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 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))) (* (cos (* -1 phi2)) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin lambda1)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))
(+ (* -1/2 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))) (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1)))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos (* -1 phi2)))) (* -1/4 (* lambda2 (* (cos (* -1 phi2)) (sin lambda1)))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/4 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1)))
(+ (* 1/2 (* (cos (* -1 phi2)) (sin lambda1))) (* lambda2 (+ (* -1/2 (* (cos lambda1) (cos (* -1 phi2)))) (* lambda2 (+ (* -1/4 (* (cos (* -1 phi2)) (sin lambda1))) (* 1/12 (* lambda2 (* (cos lambda1) (cos (* -1 phi2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/12 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) 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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(* lambda2 (sin lambda1))
(*.f64 (sin.f64 lambda1) lambda2)
(* lambda2 (+ (sin lambda1) (* -1/6 (* (pow lambda2 2) (sin lambda1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* 1/120 (* (pow lambda2 2) (sin lambda1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(* lambda2 (+ (sin lambda1) (* (pow lambda2 2) (+ (* -1/6 (sin lambda1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin lambda1))) (* 1/120 (sin lambda1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 lambda1)) lambda2)
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))
(+ (* 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 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* 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 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 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))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2)) (*.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 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* (cos phi2) (sin lambda1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* (cos phi2) (sin lambda1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin lambda1)))) (* 1/24 (* (cos phi2) (sin lambda1))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (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 lambda1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))
(+ (* 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 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* 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 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 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))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2)) (*.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 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(cos (neg lambda1))
(cos.f64 lambda1)
(+ (cos (neg lambda1)) (* -1 (* lambda2 (sin (neg lambda1)))))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* -1/2 (* lambda2 (cos (neg lambda1)))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos (neg lambda1)) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos (neg lambda1))) (* 1/6 (* lambda2 (sin (neg lambda1)))))) (sin (neg lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (neg.f64 (sin.f64 lambda1)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 (cos.f64 lambda1)) 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 #s(literal -1/2 binary64) (sin.f64 lambda1))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
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 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))
(+ (* 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 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* 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 #s(literal -1/2 binary64) lambda2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2))) lambda2 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 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))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda2) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (cos.f64 phi2)) (*.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 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(* -1 (sin lambda2))
(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 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (* (cos lambda1) (sin lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(* -1 (sin lambda2))
(neg.f64 (sin.f64 lambda2))
(* -1 (sin lambda2))
(neg.f64 (sin.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 lambda1 lambda2))) (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 lambda1 lambda2))) (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 lambda1 lambda2))) (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 lambda1 lambda2))) (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))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (+ lambda1 (* -1 lambda2))) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (sin lambda1) (sin lambda2))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda1 (* -1 lambda2))))
(cos.f64 (-.f64 lambda1 lambda2))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (+ (* -2 lambda2) (* 2 lambda1))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda1 lambda2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/2 (* (cos lambda1) (sin lambda2)))))))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64)) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (+ (* 1/2 (* (cos lambda1) (sin lambda2))) (* (pow phi2 2) (+ (* -1/24 (* (cos lambda1) (sin lambda2))) (+ (* 1/24 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda2) (sin lambda1))) (* 1/720 (* (cos lambda1) (sin lambda2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/720 binary64) (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/720 binary64) (cos.f64 lambda2)) (sin.f64 lambda1))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(- (* phi2 (- (cos phi1) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(- (* phi2 (- (+ (cos phi1) (* 1/2 (* phi2 (* (cos (- lambda1 lambda2)) (sin phi1))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi1)) phi2 #s(literal 0 binary64)))
(- (* phi2 (- (+ (cos phi1) (* phi2 (- (* phi2 (- (* -1/6 (cos phi1)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))) (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1)))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi1) (* -1 (cos phi1))))))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(fma.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal 1/2 binary64) (*.f64 (fma.f64 (cos.f64 phi1) #s(literal -1/6 binary64) #s(literal 0 binary64)) phi2)) phi2 (cos.f64 phi1)) phi2 #s(literal 0 binary64)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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 #s(literal -1/2 binary64) (sin.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* -1/2 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/24 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(+ (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))) (* (pow phi2 2) (+ (* -1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/24 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(+ (* -1/4 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/4 binary64) (*.f64 phi2 phi2) #s(literal 1/2 binary64)))
(+ (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/4 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* 1/48 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/48 binary64) (*.f64 phi2 phi2) #s(literal -1/4 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(+ (* 1/2 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/4 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (* (pow phi2 2) (+ (* -1/1440 (* (pow phi2 2) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))) (* 1/48 (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/1440 binary64) (*.f64 phi2 phi2) #s(literal 1/48 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal -1/4 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) #s(literal 1/2 binary64)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* -1/2 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* (cos lambda2) (sin lambda1))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2)) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))))))))
(fma.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.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 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))) (* 1/24 (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))))))))
(fma.f64 (fma.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.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 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)))
(* (cos lambda2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 lambda2))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))) (* (cos lambda2) (sin lambda1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))))))
(fma.f64 (*.f64 (*.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) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* (cos lambda2) (sin lambda1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin lambda1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin lambda1)))) (* 1/24 (* (cos lambda2) (sin lambda1))))))))
(fma.f64 (fma.f64 (*.f64 (*.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 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 lambda1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (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 lambda1 lambda2)) (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 lambda1 lambda2)) (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 lambda1 lambda2)) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(* 2 (sin phi1))
(*.f64 #s(literal 2 binary64) (sin.f64 phi1))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (* -1 (cos phi1)))))
(fma.f64 #s(literal 2 binary64) (sin.f64 phi1) #s(literal 0 binary64))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* -1 (* phi2 (sin phi1)))))))
(fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 phi1)) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(+ (* 2 (sin phi1)) (* phi2 (+ (cos phi1) (+ (* -1 (cos phi1)) (* phi2 (+ (* -1 (sin phi1)) (* phi2 (+ (* -1/6 (cos phi1)) (* 1/6 (cos phi1))))))))))
(fma.f64 (*.f64 (neg.f64 phi2) (sin.f64 phi1)) phi2 (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* phi2 (cos phi1)))
(fma.f64 (cos.f64 phi1) phi2 (sin.f64 phi1))
(+ (sin phi1) (* phi2 (+ (cos phi1) (* -1/2 (* phi2 (sin phi1))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) phi2) #s(literal -1/2 binary64) (cos.f64 phi1)) phi2 (sin.f64 phi1))
(+ (sin phi1) (* phi2 (+ (cos phi1) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/6 (* phi2 (cos phi1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) phi2) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) phi2 (cos.f64 phi1)) phi2 (sin.f64 phi1))
(sin phi1)
(sin.f64 phi1)
(+ (sin phi1) (* -1 (* phi2 (cos phi1))))
(fma.f64 (neg.f64 (cos.f64 phi1)) phi2 (sin.f64 phi1))
(+ (sin phi1) (* phi2 (+ (* -1 (cos phi1)) (* -1/2 (* phi2 (sin phi1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 phi1) (neg.f64 (cos.f64 phi1))) phi2 (sin.f64 phi1))
(+ (sin phi1) (* phi2 (+ (* -1 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* 1/6 (* phi2 (cos phi1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi1) phi2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1))) phi2 (neg.f64 (cos.f64 phi1))) phi2 (sin.f64 phi1))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* (cos (- lambda1 lambda2)) (sin phi1))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (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 lambda1 lambda2)) (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 lambda1 lambda2)) (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 lambda1 lambda2)) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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 phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1))))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (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 phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.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 (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2)))))
(*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2))
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(* -1 phi2)
(neg.f64 phi2)
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(* 1/2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))))
(*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 (* -1 phi2))) (sin (- phi1 (* -1 phi2))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(sin (- phi1 (* -1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi1 (* -1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi1 (* -1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi1 (* -1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(sin (+ phi1 (* -1 phi2)))
(sin.f64 (-.f64 phi1 phi2))
(sin (+ phi1 (* -1 phi2)))
(sin.f64 (-.f64 phi1 phi2))
(sin (+ phi1 (* -1 phi2)))
(sin.f64 (-.f64 phi1 phi2))
(sin (+ phi1 (* -1 phi2)))
(sin.f64 (-.f64 phi1 phi2))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))
(sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)))
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* -2 phi2)
(*.f64 #s(literal -2 binary64) phi2)
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (sin phi2) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(-.f64 (sin.f64 phi2) #s(literal 0 binary64))
(- (+ (sin phi2) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (* -1/2 (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (sin.f64 phi2) #s(literal 0 binary64)) phi1)) phi1 (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(- (+ (sin phi2) (* phi1 (- (* phi1 (- (+ (* -1/2 (sin phi2)) (* -1/2 (* phi1 (* (cos (- lambda1 lambda2)) (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (cos phi2) (cos (neg phi2)))))))) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin phi2) (sin (neg phi2))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 #s(literal -2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) #s(literal -1/3 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) phi1 (sin.f64 phi2)) #s(literal 0 binary64)) phi1)) phi1 (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
1
#s(literal 1 binary64)
(+ 1 (* -1/6 (pow phi1 2)))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6)))
(fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))
(+ 1 (* (pow phi1 2) (- (* 1/120 (pow phi1 2)) 1/6)))
(fma.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64)) (*.f64 phi1 phi1) #s(literal 1 binary64))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* phi1 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (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 phi2)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (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 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(+ (sin phi2) (sin (neg phi2)))
#s(literal 0 binary64)
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (cos (neg phi2))))))
(fma.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) phi1 #s(literal 0 binary64))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/2 (sin (neg phi2))))))))))
(fma.f64 (fma.f64 #s(literal 0 binary64) phi1 (*.f64 #s(literal 2 binary64) (cos.f64 phi2))) phi1 #s(literal 0 binary64))
(+ (sin phi2) (+ (sin (neg phi2)) (* phi1 (+ (cos phi2) (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (+ (* -1/2 (sin (neg phi2))) (* phi1 (+ (* -1/6 (cos phi2)) (* -1/6 (cos (neg phi2)))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 phi2) #s(literal -1/3 binary64)) phi1 #s(literal 0 binary64)) phi1 (*.f64 #s(literal 2 binary64) (cos.f64 phi2))) phi1 #s(literal 0 binary64))
(sin phi2)
(sin.f64 phi2)
(+ (sin phi2) (* phi1 (cos phi2)))
(fma.f64 phi1 (cos.f64 phi2) (sin.f64 phi2))
(+ (sin phi2) (* phi1 (+ (cos phi2) (* -1/2 (* phi1 (sin phi2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi2) phi1) #s(literal -1/2 binary64) (cos.f64 phi2)) phi1 (sin.f64 phi2))
(+ (sin phi2) (* phi1 (+ (cos phi2) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/6 (* phi1 (cos phi2))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi1 (cos.f64 phi2)) #s(literal -1/6 binary64) (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2))) phi1 (cos.f64 phi2)) phi1 (sin.f64 phi2))
(sin (neg phi2))
(neg.f64 (sin.f64 phi2))
(+ (sin (neg phi2)) (* phi1 (cos (neg phi2))))
(fma.f64 phi1 (cos.f64 phi2) (neg.f64 (sin.f64 phi2)))
(+ (sin (neg phi2)) (* phi1 (+ (cos (neg phi2)) (* -1/2 (* phi1 (sin (neg phi2)))))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) phi1) (cos.f64 phi2)) phi1 (neg.f64 (sin.f64 phi2)))
(+ (sin (neg phi2)) (* phi1 (+ (cos (neg phi2)) (* phi1 (+ (* -1/2 (sin (neg phi2))) (* -1/6 (* phi1 (cos (neg phi2)))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 phi1 (cos.f64 phi2)) #s(literal -1/6 binary64) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi2))) phi1 (cos.f64 phi2)) phi1 (neg.f64 (sin.f64 phi2)))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (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 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/120 (pow phi1 4))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (+ phi1 phi2)) (sin (- phi1 phi2)))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (+ phi1 phi2))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(sin (- phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1)))))))
(fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* 1/2 (* (cos (- lambda1 lambda2)) (+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos (* -1 phi2)) (sin (* 1/2 (- (* 2 lambda1) (* 2 lambda2))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* 1/120 (pow phi1 4))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))
(* (pow phi1 4) (- 1/120 (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 #s(literal 1/120 binary64) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(* (pow phi1 4) (- (+ 1/120 (/ 1 (pow phi1 4))) (* 1/6 (/ 1 (pow phi1 2)))))
(*.f64 (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (pow.f64 phi1 #s(literal 4 binary64))) #s(literal 1/120 binary64)) (/.f64 #s(literal 1/6 binary64) (*.f64 phi1 phi1))) (pow.f64 phi1 #s(literal 4 binary64)))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* (cos lambda1) (cos lambda2)) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(+ (sin (neg (+ phi2 (* -1 phi1)))) (sin (- phi2 (* -1 phi1))))
(-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi2 phi1)))
(sin (- phi2 (* -1 phi1)))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi2 (* -1 phi1)))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi2 (* -1 phi1)))
(sin.f64 (+.f64 phi1 phi2))
(sin (- phi2 (* -1 phi1)))
(sin.f64 (+.f64 phi1 phi2))
(sin (neg (+ phi2 (* -1 phi1))))
(sin.f64 (-.f64 phi1 phi2))
(sin (neg (+ phi2 (* -1 phi1))))
(sin.f64 (-.f64 phi1 phi2))
(sin (neg (+ phi2 (* -1 phi1))))
(sin.f64 (-.f64 phi1 phi2))
(sin (neg (+ phi2 (* -1 phi1))))
(sin.f64 (-.f64 phi1 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(* 1/120 (pow phi1 2))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))

rewrite239.0ms (0.9%)

Memory
17.0MiB live, 274.3MiB allocated
Rules
5 176×lower-*.f32
5 136×lower-*.f64
4 382×lower-fma.f32
4 374×lower-fma.f64
2 008×lower-pow.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
092601
0161576
1568526
24711520
08200512
Stop Event
iter limit
node limit
iter limit
Counts
34 → 537
Calls
Call 1
Inputs
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2)))
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(neg.f64 (sin.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
#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)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))
(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 lambda1 lambda2))) #s(literal 2 binary64))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64)))
(*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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)))))
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))
(+.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))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 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))))
(*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(sin.f64 (+.f64 phi1 phi2))
(sin.f64 (-.f64 phi1 phi2))
#s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(cos.f64 (-.f64 lambda1 lambda2))
#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))
(*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))
Outputs
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) #s(literal -1 binary64)))
(*.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))) (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.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 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (neg.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)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(/.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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(/.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 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.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)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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)))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))
(*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))
(*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)))
(neg.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(*.f64 #s(literal -1 binary64) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (sin.f64 lambda2)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda2) (*.f64 #s(literal 0 binary64) (sin.f64 lambda2)))))
(neg.f64 (sin.f64 lambda2))
(fma.f64 (sin.f64 #s(literal 0 binary64)) (cos.f64 lambda2) (*.f64 (cos.f64 #s(literal 0 binary64)) (neg.f64 (sin.f64 lambda2))))
(sin.f64 (neg.f64 lambda2))
(-.f64 (*.f64 (sin.f64 #s(literal 0 binary64)) (cos.f64 lambda2)) (*.f64 (cos.f64 #s(literal 0 binary64)) (sin.f64 lambda2)))
(-.f64 #s(literal 0 binary64) (sin.f64 lambda2))
(+.f64 (*.f64 (sin.f64 #s(literal 0 binary64)) (cos.f64 lambda2)) (*.f64 (cos.f64 #s(literal 0 binary64)) (neg.f64 (sin.f64 lambda2))))
(+.f64 #s(literal 0 binary64) (neg.f64 (sin.f64 lambda2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.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)))))
#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)
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(-.f64 (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 3 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))))
(*.f64 (*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(literal 1 binary64))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))) (*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #s(literal 1/2 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(*.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) #s(literal 1/2 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (*.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(fma.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64) (*.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 1/2 binary64)) (*.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (*.f64 #s(literal 1/2 binary64) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(atan2.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))))) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)))
(*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #s(literal 1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))))
(*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))) #s(literal 1/2 binary64))
(*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))) #s(literal 1/2 binary64)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))) (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))))))
(*.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64))) (pow.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))) #s(literal -1 binary64)))
(*.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))) (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64))) (pow.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64))))
(/.f64 (-.f64 (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))))
(/.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 phi1 #s(literal 6 binary64)) (pow.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (-.f64 (pow.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)))) (neg.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64))) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))))
(/.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64) (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))))))
(/.f64 (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64))) (-.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (-.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64))) (fma.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 3 binary64)) #s(literal 1/1728000 binary64) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) phi1)) phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (*.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal 1/120 binary64)) phi1 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1/120 binary64) phi1) (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) #s(literal -1 binary64)) (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal -1 binary64)) #s(literal -1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))
(fma.f64 (fma.f64 #s(literal -1/216 binary64) (pow.f64 phi1 #s(literal 6 binary64)) #s(literal 1 binary64)) (pow.f64 (fma.f64 #s(literal 1/36 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)))) #s(literal -1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))
(fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 phi1 phi1) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/120 binary64) (pow.f64 phi1 #s(literal 4 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1 binary64)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 phi1 (*.f64 (*.f64 #s(literal -1/6 binary64) phi1) #s(literal 1 binary64)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(fma.f64 phi1 (*.f64 (pow.f64 phi1 #s(literal 3 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(fma.f64 phi1 (*.f64 #s(literal -1/6 binary64) phi1) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) #s(literal 2 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))) (/.f64 (*.f64 (pow.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 2 binary64)) #s(literal 1/14400 binary64)) (-.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))))
(+.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1))) #s(literal 1 binary64))
(+.f64 (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)) (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)))
(+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) #s(literal 1 binary64)))
(+.f64 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))
(+.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))
(+.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -1/6 binary64) phi1) phi1 (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 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 (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) #s(literal -1 binary64)))
(*.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))) (pow.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (cos.f64 phi2) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (-.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 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (neg.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(/.f64 (neg.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)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(/.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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
(/.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 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (-.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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))) (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.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)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)))
(fma.f64 (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))))
(+.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (cos.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2))) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))) (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (cos.f64 lambda2)))))
(-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))
(-.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(*.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64))
(*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(pow.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal -1 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal -1 binary64)) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) (*.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal -1 binary64))))
(/.f64 (*.f64 (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal -1 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal -1 binary64))) #s(literal -1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda1)) (sin.f64 lambda2)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))
(*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi2) (+.f64 (sin.f64 (+.f64 lambda1 lambda2)) (sin.f64 (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (pow.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))))
(*.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (pow.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64))) (cos.f64 (/.f64 (-.f64 (-.f64 phi1 phi2) (+.f64 phi1 phi2)) #s(literal 2 binary64)))))
(*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64))) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (*.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64))) (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (sin.f64 (-.f64 phi1 phi2)) (-.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 3 binary64)))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (sin.f64 phi1) (cos.f64 phi2) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(fma.f64 (cos.f64 phi2) (sin.f64 phi1) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(-.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(-.f64 (/.f64 (pow.f64 (sin.f64 (+.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (/.f64 (pow.f64 (sin.f64 (-.f64 phi1 phi2)) #s(literal 2 binary64)) (-.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (sin.f64 (+.f64 phi1 phi2))))
(+.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2)))
(+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 phi2) (cos.f64 phi1) (sin.f64 (-.f64 phi1 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (sin.f64 (-.f64 phi1 phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 phi2) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi2) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi1) (sin.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(fma.f64 (cos.f64 phi2) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(sin.f64 (+.f64 phi1 phi2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64))) (sin.f64 (+.f64 phi1 phi2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))))
(fma.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 phi1 phi2) (-.f64 phi1 phi2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (+.f64 phi1 phi2) phi1) phi2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi2))))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi1 phi2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi2))))
(fma.f64 (sin.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (sin.f64 phi1) (cos.f64 phi2) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (sin.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 (sin.f64 phi1) (cos.f64 phi2) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi2))))
(fma.f64 (cos.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(fma.f64 (cos.f64 phi2) (sin.f64 phi1) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(fma.f64 (cos.f64 phi2) (sin.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 (cos.f64 phi2) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi2))))
(sin.f64 (-.f64 phi1 phi2))
(-.f64 (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (+.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi1 phi2)))))
(-.f64 (*.f64 (sin.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))) (cos.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))))) (*.f64 (cos.f64 (/.f64 (pow.f64 phi1 #s(literal 3 binary64)) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2))))) (sin.f64 (/.f64 (pow.f64 phi2 #s(literal 3 binary64)) (fma.f64 phi1 phi1 (*.f64 phi2 (+.f64 phi1 phi2)))))))
(-.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(+.f64 (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (sin.f64 phi2)) (cos.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi1)) (sin.f64 phi2)))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (neg.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(+.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (neg.f64 (sin.f64 phi2))))
#s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))
(*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64))) (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) #s(literal -1 binary64)))
(*.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64))) (pow.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) #s(literal 2 binary64))) (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 2 binary64))) (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (+.f64 (pow.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (-.f64 (pow.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 2 binary64)) (*.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64))) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)))
(/.f64 (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64))) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 lambda1 lambda2) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal -1 binary64)) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64)) (*.f64 phi2 phi2)) (pow.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(fma.f64 #s(literal -1 binary64) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))
(fma.f64 (-.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (pow.f64 lambda2 #s(literal 3 binary64))) (pow.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(fma.f64 (-.f64 (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (pow.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 (neg.f64 phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(fma.f64 (-.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 3 binary64)) (pow.f64 phi2 #s(literal 3 binary64))) (pow.f64 (fma.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) #s(literal -1 binary64)) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))) (/.f64 (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 2 binary64)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))))
(-.f64 (/.f64 (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 3 binary64)) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))) (/.f64 (pow.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) #s(literal 3 binary64)) (fma.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2)) (pow.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(literal 2 binary64)))))
(-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))
(-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(-.f64 (-.f64 lambda1 lambda2) (+.f64 phi2 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(-.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 #s(literal 2 binary64) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(-.f64 lambda1 (+.f64 (+.f64 phi2 lambda2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(+.f64 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2))
(+.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (-.f64 (neg.f64 phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (fma.f64 #s(literal -1 binary64) phi2 (neg.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))))
(+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) (neg.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
(+.f64 (-.f64 lambda1 lambda2) (-.f64 (neg.f64 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)))
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (pow.f64 (cos.f64 (+.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (pow.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) #s(literal -1 binary64)))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (sin.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda1 lambda2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (-.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)) (cos.f64 (+.f64 lambda1 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (neg.f64 (sin.f64 lambda2))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))) (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (pow.f64 lambda1 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (pow.f64 lambda2 #s(literal 3 binary64)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) (fma.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)))))
(*.f64 (*.f64 #s(literal 1/120 binary64) phi1) phi1)
(*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))
(*.f64 (*.f64 phi1 phi1) #s(literal 1/120 binary64))
(*.f64 phi1 (*.f64 #s(literal 1/120 binary64) phi1))

eval344.0ms (1.2%)

Memory
-8.0MiB live, 453.1MiB allocated
Compiler

Compiled 73 949 to 4 409 computations (94% saved)

prune377.0ms (1.4%)

Memory
14.4MiB live, 834.6MiB allocated
Pruning

111 alts after pruning (110 fresh and 1 done)

PrunedKeptTotal
New1 770411 811
Fresh3469103
Picked415
Done101
Total1 8091111 920
Accuracy
100.0%
Counts
1 920 → 111
Alt Table
Click to see full alt table
StatusAccuracyProgram
98.0%
(atan2.f64 (fma.f64 (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (sin.f64 lambda2) #s(literal 2 binary64))) (+.f64 #s(literal 0 binary64) (sin.f64 lambda2))) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
51.1%
(atan2.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.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 (*.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))))
99.8%
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))))
80.1%
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (sin.f64 phi1) (+.f64 (cos.f64 (-.f64 (-.f64 lambda2 lambda1) phi2)) (cos.f64 (+.f64 (-.f64 lambda2 lambda1) phi2)))) #s(literal 2 binary64))))
89.9%
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal -1 binary64)))))
99.8%
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
99.8%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
76.5%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
89.9%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
83.0%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) #s(approx (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
69.3%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) #s(approx (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (*.f64 (neg.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)))))
82.4%
(atan2.f64 (fma.f64 #s(approx (* (cos lambda2) (sin lambda1)) (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)))))
85.9%
(atan2.f64 (/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2)) #s(literal 3 binary64))) (cos.f64 phi2)) (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2))) (pow.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
77.9%
(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)))))
81.1%
(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)))))
55.9%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1))))
51.4%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 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))))
54.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) #s(approx (+ (+ (* (* phi1 phi1) -1/6) 1) (* (* phi1 phi1) (* 1/120 (* phi1 phi1)))) (*.f64 (pow.f64 phi1 #s(literal 4 binary64)) #s(literal 1/120 binary64)))) phi1))))
81.0%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))))
78.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
55.6%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
76.5%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
51.1%
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.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 (*.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))))
62.3%
(atan2.f64 (*.f64 (/.f64 (-.f64 (cos.f64 (-.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 (+.f64 (+.f64 lambda1 lambda2) lambda1) lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) #s(literal 2 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)))))
77.8%
(atan2.f64 (*.f64 (/.f64 (*.f64 #s(literal 1 binary64) (cos.f64 phi2)) (sin.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 (+.f64 lambda1 lambda2)) (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 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
46.9%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 (-.f64 lambda2 phi2))) (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)))))
31.8%
(atan2.f64 (*.f64 (+.f64 (sin.f64 (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2)) (sin.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 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)))))
79.3%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (fma.f64 (sin.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.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)))))
65.8%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
42.5%
(atan2.f64 (*.f64 (*.f64 #s(approx (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 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)))))
35.9%
(atan2.f64 (*.f64 (*.f64 #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 #s(approx (- lambda1 lambda2) (neg.f64 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)))))
27.1%
(atan2.f64 (*.f64 (sin.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))) (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))))
25.8%
(atan2.f64 (*.f64 (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.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))))
76.0%
(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)))))
71.3%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 phi2 (-.f64 lambda1 lambda2))) (cos.f64 (+.f64 phi2 (-.f64 lambda1 lambda2)))) (sin.f64 phi1)) #s(literal 2 binary64))))
81.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (cos.f64 (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
69.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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
41.3%
(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 #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 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))))
67.9%
(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))))))
77.1%
(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)))))
40.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)) (cos.f64 (-.f64 lambda1 lambda2)))))
65.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.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)))))
41.5%
(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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
48.3%
(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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
48.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
37.0%
(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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
48.1%
(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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
31.4%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
29.3%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 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))))))
40.6%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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))))))
49.6%
(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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
44.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 lambda1 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
45.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
42.2%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
46.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64))) (-.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.4%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (fma.f64 (sin.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (neg.f64 (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))))) #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)))))
44.2%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (-.f64 lambda1 lambda2) (-.f64 phi2 (-.f64 lambda1 (-.f64 lambda2 phi2)))) #s(literal 1/2 binary64)))) #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)))))
40.1%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
42.7%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) (sin.f64 #s(approx (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2) (neg.f64 lambda2)))) #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)))))
35.9%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (-.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 (sin.f64 lambda1) (sin.f64 lambda2))))))
36.0%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (-.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))))))
33.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))
31.0%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (-.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) phi2) #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) #s(approx (sin lambda1) (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)))) #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)))))
36.2%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 (+.f64 (+.f64 phi2 lambda2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))) #s(literal 1/2 binary64))) #s(approx (sin (* (- (+ (- (- lambda1 lambda2) phi2) lambda1) (- lambda2 phi2)) 1/2)) (sin.f64 lambda1))) #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)))))
39.0%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 lambda1 (+.f64 (+.f64 lambda2 phi2) (+.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)) phi2))) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
46.8%
(atan2.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) (fma.f64 #s(literal 2 binary64) phi2 lambda1)) lambda2) #s(literal 1/2 binary64))) (sin.f64 (*.f64 (-.f64 (+.f64 (-.f64 (-.f64 lambda1 lambda2) phi2) lambda1) (-.f64 lambda2 phi2)) #s(literal 1/2 binary64)))) #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)))))
59.0%
(atan2.f64 #s(approx (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (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))))))
46.5%
(atan2.f64 #s(approx (* (* (* (sin (+ lambda2 lambda1)) (sin (- lambda1 lambda2))) (/ 1 (sin (+ lambda2 lambda1)))) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #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)))))
47.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64))) (sin.f64 (+.f64 lambda2 lambda1)))) (-.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))))))
55.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 (*.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.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 (*.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))))
46.5%
(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 (*.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))))))
43.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.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))))))
32.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1)))) (-.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))))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.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))))))
31.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.4%
(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)) #s(approx (sin (- phi1 phi2)) (sin.f64 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
35.5%
(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)) #s(approx (sin (- phi1 phi2)) (neg.f64 (sin.f64 phi2)))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
35.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 (+.f64 #s(approx (sin (+ phi1 phi2)) (sin.f64 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
48.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 (+.f64 #s(approx (sin (+ phi1 phi2)) (sin.f64 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
31.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 #s(approx (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
50.4%
(atan2.f64 #s(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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
44.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)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
41.5%
(atan2.f64 #s(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 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))))))
45.4%
(atan2.f64 #s(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)))))
44.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) (cos.f64 phi2)) #s(approx (cos (- 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)) #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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
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 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
45.5%
(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) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))))
50.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (*.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2)) #s(literal 2 binary64))) (pow.f64 (fma.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))) #s(literal -1 binary64))))
30.6%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))))
46.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
31.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64))))
45.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
41.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
43.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (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)) (sin.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (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 #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.9%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
30.6%
(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)) #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 lambda1 lambda2)) (sin.f64 phi1))))))
30.4%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2)))))
34.9%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))
24.6%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))))
34.7%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
34.9%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))
33.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (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 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))))
34.6%
(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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))
25.2%
(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 (*.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))))))
26.5%
(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 (*.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))))))
Compiler

Compiled 10 787 to 3 620 computations (66.4% saved)

regimes418.0ms (1.5%)

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

6 calls:

77.0ms
lambda1
75.0ms
lambda2
59.0ms
phi2
58.0ms
phi1
57.0ms
(-.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)

regimes362.0ms (1.3%)

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

6 calls:

61.0ms
lambda1
60.0ms
(-.f64 lambda1 lambda2)
60.0ms
lambda2
59.0ms
phi1
57.0ms
phi2
Results
AccuracySegmentsBranch
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)
99.8%1lambda1
99.8%1lambda2
99.8%1phi1
99.8%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes588.0ms (2.1%)

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

6 calls:

136.0ms
lambda1
126.0ms
lambda2
103.0ms
phi2
96.0ms
phi1
66.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)

regimes570.0ms (2.1%)

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

6 calls:

152.0ms
lambda2
104.0ms
phi1
92.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)))))
84.0ms
(-.f64 lambda1 lambda2)
71.0ms
phi2
Results
AccuracySegmentsBranch
89.9%1lambda1
89.9%1lambda2
89.9%1phi1
93.9%3phi2
89.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.9%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes123.0ms (0.4%)

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

2 calls:

64.0ms
(-.f64 lambda1 lambda2)
49.0ms
phi2
Results
AccuracySegmentsBranch
89.9%1(-.f64 lambda1 lambda2)
89.9%1phi2
Compiler

Compiled 4 to 9 computations (-125% saved)

regimes391.0ms (1.4%)

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

6 calls:

89.0ms
lambda1
64.0ms
phi2
62.0ms
(-.f64 lambda1 lambda2)
60.0ms
lambda2
53.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
89.9%1lambda2
89.9%1phi1
89.9%1lambda1
89.9%1phi2
89.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.9%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes621.0ms (2.2%)

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

6 calls:

202.0ms
phi2
191.0ms
lambda2
52.0ms
phi1
50.0ms
lambda1
50.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
89.9%1lambda2
89.9%1phi2
89.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.9%1lambda1
89.9%1phi1
89.9%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes314.0ms (1.1%)

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

6 calls:

60.0ms
lambda1
58.0ms
phi1
55.0ms
phi2
46.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)))))
43.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
89.9%1lambda2
89.9%1phi2
89.9%1lambda1
89.9%1phi1
89.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.9%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes294.0ms (1.1%)

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

6 calls:

63.0ms
(-.f64 lambda1 lambda2)
48.0ms
phi1
44.0ms
phi2
43.0ms
lambda1
43.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
89.6%3lambda2
88.7%3phi1
85.2%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)) (cos.f64 (-.f64 lambda1 lambda2)))))
89.6%3lambda1
87.1%3phi2
83.2%2(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes403.0ms (1.5%)

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

3 calls:

309.0ms
lambda2
44.0ms
lambda1
42.0ms
phi1
Results
AccuracySegmentsBranch
88.3%3phi1
83.5%2lambda2
85.8%3lambda1
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes49.0ms (0.2%)

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

1 calls:

42.0ms
phi1
Results
AccuracySegmentsBranch
88.3%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes51.0ms (0.2%)

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

1 calls:

43.0ms
phi1
Results
AccuracySegmentsBranch
88.3%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes61.0ms (0.2%)

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

1 calls:

54.0ms
phi1
Results
AccuracySegmentsBranch
88.2%3phi1
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes483.0ms (1.7%)

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

4 calls:

324.0ms
phi2
61.0ms
lambda1
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)))))
36.0ms
phi1
Results
AccuracySegmentsBranch
81.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)))))
81.2%1lambda1
85.1%3phi2
81.2%1phi1
Compiler

Compiled 27 to 29 computations (-7.4% saved)

regimes185.0ms (0.7%)

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

4 calls:

62.0ms
phi2
41.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)))))
40.0ms
lambda2
34.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
81.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)))))
81.2%1(-.f64 lambda1 lambda2)
81.2%1lambda2
81.2%1phi2
Compiler

Compiled 29 to 30 computations (-3.4% saved)

regimes147.0ms (0.5%)

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

6 calls:

26.0ms
phi1
24.0ms
lambda1
24.0ms
(-.f64 lambda1 lambda2)
23.0ms
lambda2
23.0ms
phi2
Results
AccuracySegmentsBranch
74.1%2phi1
76.8%3phi2
81.1%3lambda1
81.4%3lambda2
72.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)))))
72.2%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes34.0ms (0.1%)

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

1 calls:

30.0ms
lambda2
Results
AccuracySegmentsBranch
81.4%3lambda2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes29.0ms (0.1%)

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

1 calls:

23.0ms
lambda2
Results
AccuracySegmentsBranch
81.2%3lambda2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes152.0ms (0.5%)

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

6 calls:

34.0ms
(-.f64 lambda1 lambda2)
29.0ms
lambda1
22.0ms
lambda2
21.0ms
phi2
21.0ms
phi1
Results
AccuracySegmentsBranch
67.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)))))
67.9%1(-.f64 lambda1 lambda2)
67.9%1phi1
67.9%1phi2
73.9%4lambda1
75.2%4lambda2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes24.0ms (0.1%)

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

1 calls:

20.0ms
lambda2
Results
AccuracySegmentsBranch
71.9%2lambda2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes86.0ms (0.3%)

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

4 calls:

26.0ms
lambda2
19.0ms
lambda1
19.0ms
phi2
18.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
67.9%1phi2
67.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)))))
67.9%1lambda1
67.9%1lambda2
Compiler

Compiled 27 to 29 computations (-7.4% saved)

regimes88.0ms (0.3%)

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

6 calls:

23.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)))))
13.0ms
lambda2
13.0ms
phi2
12.0ms
lambda1
12.0ms
phi1
Results
AccuracySegmentsBranch
60.8%3lambda2
59.8%3lambda1
54.8%3phi1
50.3%1(-.f64 lambda1 lambda2)
60.2%4phi2
53.9%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)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes36.0ms (0.1%)

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

3 calls:

12.0ms
lambda2
11.0ms
phi2
11.0ms
lambda1
Results
AccuracySegmentsBranch
58.3%3phi2
56.6%3lambda1
56.0%3lambda2
Compiler

Compiled 3 to 12 computations (-300% saved)

regimes235.0ms (0.8%)

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

6 calls:

182.0ms
(-.f64 lambda1 lambda2)
11.0ms
lambda2
10.0ms
phi2
10.0ms
lambda1
9.0ms
phi1
Results
AccuracySegmentsBranch
50.3%1(-.f64 lambda1 lambda2)
50.3%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)))))
50.3%1phi1
50.3%1lambda2
50.3%1lambda1
50.3%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes30.0ms (0.1%)

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

6 calls:

6.0ms
phi2
5.0ms
lambda1
5.0ms
(-.f64 lambda1 lambda2)
5.0ms
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)))))
Results
AccuracySegmentsBranch
49.7%3phi1
50.2%3lambda1
49.3%2phi2
46.1%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)))))
50.6%3lambda2
46.1%1(-.f64 lambda1 lambda2)
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes6.0ms (0%)

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

1 calls:

5.0ms
phi2
Results
AccuracySegmentsBranch
49.2%2phi2
Compiler

Compiled 1 to 4 computations (-300% saved)

regimes5.0ms (0%)

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

2 calls:

2.0ms
phi2
2.0ms
lambda2
Results
AccuracySegmentsBranch
46.1%1lambda2
48.6%2phi2
Compiler

Compiled 2 to 8 computations (-300% saved)

regimes12.0ms (0%)

Memory
-15.2MiB live, 25.9MiB allocated
Counts
2 → 3
Calls
Call 1
Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
Outputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))
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
(-.f64 lambda1 lambda2)
2.0ms
lambda1
2.0ms
phi2
Results
AccuracySegmentsBranch
45.4%1(-.f64 lambda1 lambda2)
45.4%1lambda2
45.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)))))
49.0%3phi1
45.4%1lambda1
45.4%1phi2
Compiler

Compiled 31 to 38 computations (-22.6% saved)

regimes9.0ms (0%)

Memory
20.7MiB live, 20.7MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

6 calls:

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)))))
1.0ms
(-.f64 lambda1 lambda2)
1.0ms
lambda1
1.0ms
phi2
1.0ms
lambda2
Results
AccuracySegmentsBranch
31.0%1lambda2
31.0%1phi2
31.0%1lambda1
31.0%1(-.f64 lambda1 lambda2)
31.0%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)))))
31.0%1phi1
Compiler

Compiled 31 to 38 computations (-22.6% saved)

bsearch163.0ms (0.6%)

Memory
12.6MiB live, 209.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
74.0ms
6.250234335619262e-53
4.45655084359641e-45
80.0ms
-13.569949548468726
-5.290884567059334e-11
Samples
124.0ms210×1valid
15.0ms94×0valid
Compiler

Compiled 1 311 to 946 computations (27.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 127.0ms
ival-cos: 48.0ms (37.9% of total)
ival-sin: 46.0ms (36.3% of total)
ival-mult: 14.0ms (11.1% of total)
adjust: 9.0ms (7.1% of total)
ival-sub: 5.0ms (3.9% of total)
ival-atan2: 5.0ms (3.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch197.0ms (0.7%)

Memory
-10.2MiB live, 221.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
86.0ms
1.257761637128723e-17
3.694304051006917e-7
101.0ms
-393981.2926101026
-3.8944994386487804e-17
Samples
131.0ms163×1valid
41.0ms173×0valid
Compiler

Compiled 1 161 to 885 computations (23.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 159.0ms
ival-sin: 65.0ms (40.9% of total)
ival-cos: 55.0ms (34.6% of total)
ival-mult: 16.0ms (10.1% of total)
adjust: 11.0ms (6.9% of total)
ival-atan2: 6.0ms (3.8% of total)
ival-sub: 5.0ms (3.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch192.0ms (0.7%)

Memory
14.5MiB live, 243.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
99.0ms
3.085789380128942e-12
24583.207352037003
84.0ms
-0.020919765390906644
-1.1218530266678953e-8
Samples
145.0ms194×1valid
17.0ms110×0valid
Compiler

Compiled 1 395 to 993 computations (28.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 149.0ms
ival-cos: 58.0ms (38.8% of total)
ival-sin: 46.0ms (30.8% of total)
adjust: 18.0ms (12% of total)
ival-mult: 16.0ms (10.7% of total)
ival-sub: 5.0ms (3.3% of total)
ival-atan2: 5.0ms (3.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch166.0ms (0.6%)

Memory
-11.9MiB live, 126.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
84.0ms
3.085789380128942e-12
24583.207352037003
75.0ms
-0.020919765390906644
-1.1218530266678953e-8
Samples
125.0ms128×1valid
10.0ms64×0valid
Compiler

Compiled 1 205 to 917 computations (23.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 127.0ms
ival-cos: 59.0ms (46.6% of total)
ival-sin: 47.0ms (37.1% of total)
ival-mult: 8.0ms (6.3% of total)
adjust: 6.0ms (4.7% of total)
ival-atan2: 4.0ms (3.2% of total)
ival-sub: 3.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch178.0ms (0.6%)

Memory
14.9MiB live, 282.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
96.0ms
3.085789380128942e-12
24583.207352037003
73.0ms
-0.020919765390906644
-1.1218530266678953e-8
Samples
141.0ms191×1valid
14.0ms81×0valid
Compiler

Compiled 1 072 to 822 computations (23.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 144.0ms
ival-cos: 68.0ms (47.1% of total)
ival-sin: 41.0ms (28.4% of total)
adjust: 12.0ms (8.3% of total)
ival-mult: 12.0ms (8.3% of total)
ival-sub: 5.0ms (3.5% of total)
ival-atan2: 5.0ms (3.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch190.0ms (0.7%)

Memory
12.2MiB live, 314.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
76.0ms
3.085789380128942e-12
24583.207352037003
105.0ms
-51561.48190889212
-0.020919765390906644
Samples
147.0ms189×1valid
22.0ms83×0valid
Compiler

Compiled 1 034 to 822 computations (20.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 156.0ms
ival-cos: 59.0ms (37.9% of total)
ival-sin: 47.0ms (30.2% of total)
ival-atan2: 22.0ms (14.1% of total)
ival-mult: 12.0ms (7.7% of total)
adjust: 11.0ms (7.1% of total)
ival-sub: 5.0ms (3.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch145.0ms (0.5%)

Memory
-18.2MiB live, 259.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
57.0ms
1.1209291658327956e-7
5.33773934331146e-6
79.0ms
-13.569949548468726
-5.290884567059334e-11
Samples
108.0ms161×1valid
15.0ms95×0valid
Compiler

Compiled 894 to 721 computations (19.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 112.0ms
ival-sin: 43.0ms (38.3% of total)
ival-cos: 33.0ms (29.4% of total)
ival-atan2: 12.0ms (10.7% of total)
ival-mult: 11.0ms (9.8% of total)
adjust: 9.0ms (8% of total)
ival-sub: 5.0ms (4.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch214.0ms (0.8%)

Memory
40.4MiB live, 270.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
71.0ms
1.949114337732141e-14
2.868672883059369e-6
135.0ms
-8.444180769582342
-7.400067348636602e-13
Samples
159.0ms134×1valid
34.0ms170×0valid
Compiler

Compiled 911 to 756 computations (17% saved)

Precisions
Click to see histograms. Total time spent on operations: 181.0ms
ival-sin: 106.0ms (58.6% of total)
ival-cos: 47.0ms (26% of total)
ival-mult: 12.0ms (6.6% of total)
adjust: 6.0ms (3.3% of total)
ival-sub: 5.0ms (2.8% of total)
ival-atan2: 5.0ms (2.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch5.0ms (0%)

Memory
-31.4MiB live, 7.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
3.0ms
1.949114337732141e-14
2.868672883059369e-6
1.0ms
-8.444180769582342
-7.400067348636602e-13
Compiler

Compiled 901 to 756 computations (16.1% saved)

bsearch87.0ms (0.3%)

Memory
-0.0MiB live, 140.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
82.0ms
1.682442712881163e+28
5.871766539172574e+31
1.0ms
-8.444180769582342
-7.400067348636602e-13
Samples
73.0ms113×1valid
3.0ms15×0valid
Compiler

Compiled 855 to 726 computations (15.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 70.0ms
ival-sin: 24.0ms (34.3% of total)
ival-cos: 22.0ms (31.4% of total)
ival-mult: 13.0ms (18.6% of total)
adjust: 6.0ms (8.6% of total)
ival-sub: 3.0ms (4.3% of total)
ival-atan2: 3.0ms (4.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch146.0ms (0.5%)

Memory
-13.9MiB live, 259.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
narrow-enough
Steps
TimeLeftRight
47.0ms
4.949884148264476e-185
6.1422614892209275e-183
61.0ms
-9.760242197519202e-180
-1.4951757105124213e-184
26.0ms
-8.444180769582342
-7.400067348636602e-13
Samples
82.0ms124×1valid
38.0ms180×0valid
Compiler

Compiled 1 152 to 984 computations (14.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 108.0ms
ival-sin: 41.0ms (38.1% of total)
ival-cos: 39.0ms (36.2% of total)
ival-mult: 11.0ms (10.2% of total)
ival-sub: 6.0ms (5.6% of total)
adjust: 6.0ms (5.6% of total)
ival-atan2: 4.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
4.1MiB live, 4.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
-8.444180769582342
-7.400067348636602e-13
Compiler

Compiled 477 to 414 computations (13.2% saved)

bsearch254.0ms (0.9%)

Memory
39.9MiB live, 267.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
132.0ms
26467352546.28894
1.537663589748903e+23
115.0ms
-5.1155723971149094e-33
-3.042898897009858e-44
Samples
198.0ms151×1valid
34.0ms169×0valid
Compiler

Compiled 887 to 804 computations (9.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 219.0ms
ival-cos: 100.0ms (45.6% of total)
ival-sin: 46.0ms (21% of total)
ival-mult: 33.0ms (15% of total)
adjust: 30.0ms (13.7% of total)
ival-sub: 5.0ms (2.3% of total)
ival-atan2: 5.0ms (2.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch183.0ms (0.7%)

Memory
-6.6MiB live, 235.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
76.0ms
439042166565442.44
4721043853937042000.0
100.0ms
-1.520526960002802e+19
-22065931570709.89
Samples
141.0ms176×1valid
19.0ms96×0valid
Compiler

Compiled 843 to 738 computations (12.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 148.0ms
ival-cos: 52.0ms (35% of total)
ival-sin: 41.0ms (27.6% of total)
adjust: 23.0ms (15.5% of total)
ival-mult: 21.0ms (14.1% of total)
ival-sub: 5.0ms (3.4% of total)
ival-atan2: 5.0ms (3.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch49.0ms (0.2%)

Memory
-3.2MiB live, 80.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
47.0ms
0.00017976855604720043
0.0007003765308804719
Samples
35.0ms58×1valid
3.0ms22×0valid
Compiler

Compiled 222 to 199 computations (10.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 34.0ms
ival-cos: 14.0ms (40.7% of total)
ival-sin: 11.0ms (32% of total)
adjust: 3.0ms (8.7% of total)
ival-mult: 3.0ms (8.7% of total)
ival-atan2: 2.0ms (5.8% of total)
ival-sub: 1.0ms (2.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch96.0ms (0.3%)

Memory
2.7MiB live, 156.7MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
92.0ms
0.0007003765308804719
3343385653896.876
Samples
64.0ms104×1valid
21.0ms56×0valid
Compiler

Compiled 437 to 384 computations (12.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 68.0ms
ival-sin: 28.0ms (41.4% of total)
ival-cos: 23.0ms (34% of total)
ival-mult: 7.0ms (10.3% of total)
adjust: 5.0ms (7.4% of total)
ival-sub: 3.0ms (4.4% of total)
ival-atan2: 3.0ms (4.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch50.0ms (0.2%)

Memory
3.5MiB live, 78.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
48.0ms
439042166565442.44
4721043853937042000.0
Samples
34.0ms56×1valid
7.0ms40×0valid
Compiler

Compiled 275 to 264 computations (4% saved)

Precisions
Click to see histograms. Total time spent on operations: 37.0ms
ival-sin: 13.0ms (35.1% of total)
ival-cos: 12.0ms (32.4% of total)
ival-sub: 4.0ms (10.8% of total)
ival-mult: 4.0ms (10.8% of total)
adjust: 2.0ms (5.4% of total)
ival-atan2: 2.0ms (5.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch166.0ms (0.6%)

Memory
-28.8MiB live, 285.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
77.0ms
3.3561826888314425e-15
4.597526749450348e-13
83.0ms
-6.397869757970755e-13
-7.531106893570404e-16
Samples
115.0ms165×1valid
34.0ms75×0valid
Compiler

Compiled 417 to 429 computations (-2.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 114.0ms
ival-cos: 48.0ms (42.1% of total)
ival-sin: 39.0ms (34.2% of total)
ival-mult: 11.0ms (9.6% of total)
adjust: 7.0ms (6.1% of total)
ival-sub: 4.0ms (3.5% of total)
ival-atan2: 4.0ms (3.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify48.0ms (0.2%)

Memory
-7.5MiB live, 110.4MiB allocated
Algorithm
egg-herbie
Rules
150×*-commutative-binary64-*.f64
104×+-commutative-binary64-+.f64
104×sub-neg-binary64-neg.f64-+.f64--.f64
68×neg-sub0-binary64--.f64-neg.f64
68×neg-mul-1-binary64-*.f64-neg.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02812289
13922289
25032289
35802289
46162289
56252289
66262289
Stop Event
saturated
Calls
Call 1
Inputs
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (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 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(if (<=.f64 phi2 #s(literal -8028023020878397/1180591620717411303424 binary64)) (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))))) (if (<=.f64 phi2 #s(literal 7070527394739557/1606938044258990275541962092341162602522202993782792835301376 binary64)) (atan2.f64 #s(approx (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (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 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.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 (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 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 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (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 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.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 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(if (<=.f64 lambda1 #s(literal -2824657686286775/1152921504606846976 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 3447327532494841/9444732965739290427392 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))))
(if (<=.f64 phi1 #s(literal -5908722711110091/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 8070450532247929/288230376151711744 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.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 (*.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -1080863910568919/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 5764607523034235/2305843009213693952 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3984496719921263/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 6788401819125115/73786976294838206464 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -6052837899185947/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 7350268983256945/77371252455336267181195264 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi2 #s(literal -5902958103587057/18446744073709551616 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi2 #s(literal 4911261142184431/9444732965739290427392 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 (*.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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 6611313076017503/2361183241434822606848 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 6611313076017503/2361183241434822606848 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 16999999999999999951010529280 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/576460752303423488 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal -5606327030934153/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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)))))) (if (<=.f64 lambda2 #s(literal 2966120754499563/9568131466127621947163770315237577352582483950433331955534014747297500715462012198465648064079848065788579276806882658480425438483841942548911565191978080929321047135323978360596199778018349602045952 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))))) (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 lambda2 #s(literal -6456360425798343/576460752303423488 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)) #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)) #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 (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 lambda2 #s(literal -8231177221447645/93536104789177786765035829293842113257979682750464 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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)))))) (if (<=.f64 lambda2 #s(literal 27000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.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 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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))))))))
(if (<=.f64 phi2 #s(literal -120000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.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)))))) (if (<=.f64 phi2 #s(literal 4400000000000000 binary64)) (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 (*.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 (*.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))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 phi2 #s(literal 6456360425798343/9223372036854775808 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (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) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))))
(if (<=.f64 phi2 #s(literal 2476979795053773/1125899906842624 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 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 #s(approx (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
(if (<=.f64 phi2 #s(literal 720000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))))
(if (<=.f64 phi1 #s(literal -7707315649387635/10141204801825835211973625643008 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 1077503010193995/316912650057057350374175801344 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64))))
Outputs
(atan2.f64 (fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (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 (fma.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (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 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(if (<=.f64 phi2 #s(literal -8028023020878397/1180591620717411303424 binary64)) (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))))) (if (<=.f64 phi2 #s(literal 7070527394739557/1606938044258990275541962092341162602522202993782792835301376 binary64)) (atan2.f64 #s(approx (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (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 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.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)))))))
(if (<=.f64 phi2 #s(literal -8028023020878397/1180591620717411303424 binary64)) (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (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 7070527394739557/1606938044258990275541962092341162602522202993782792835301376 binary64)) (atan2.f64 #s(approx (+ (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (* (* (sin lambda1) (cos lambda2)) (cos phi2))) (fma.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (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)))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 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 (fma.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (neg.f64 (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 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (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 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (neg.f64 (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 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.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 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (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)))))
(atan2.f64 (*.f64 (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.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 (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 lambda1 #s(literal -2824657686286775/1152921504606846976 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 3447327532494841/9444732965739290427392 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -2824657686286775/1152921504606846976 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 3447327532494841/9444732965739290427392 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 phi1 #s(literal -5908722711110091/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 8070450532247929/288230376151711744 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.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 (*.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 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -5908722711110091/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 8070450532247929/288230376151711744 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda1) (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1)) (*.f64 phi1 phi1)) (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.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -1080863910568919/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 5764607523034235/2305843009213693952 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -1080863910568919/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 5764607523034235/2305843009213693952 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))) phi1)))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3984496719921263/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 6788401819125115/73786976294838206464 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -3984496719921263/295147905179352825856 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 6788401819125115/73786976294838206464 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -6052837899185947/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 7350268983256945/77371252455336267181195264 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi1 #s(literal -6052837899185947/288230376151711744 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi1 #s(literal 7350268983256945/77371252455336267181195264 binary64)) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi2 #s(literal -5902958103587057/18446744073709551616 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi2 #s(literal 4911261142184431/9444732965739290427392 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 (*.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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(if (<=.f64 phi2 #s(literal -5902958103587057/18446744073709551616 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 phi2 #s(literal 4911261142184431/9444732965739290427392 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 6611313076017503/2361183241434822606848 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1)))) (if (<=.f64 lambda2 #s(literal 6611313076017503/2361183241434822606848 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))) (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 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 6611313076017503/2361183241434822606848 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal 6611313076017503/2361183241434822606848 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))) (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 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 16999999999999999951010529280 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/1152921504606846976 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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal 16999999999999999951010529280 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 lambda2) (cos lambda1)) (* (sin lambda2) (sin lambda1)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/576460752303423488 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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal -5606327030934153/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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)))))) (if (<=.f64 lambda2 #s(literal 2966120754499563/9568131466127621947163770315237577352582483950433331955534014747297500715462012198465648064079848065788579276806882658480425438483841942548911565191978080929321047135323978360596199778018349602045952 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))))) (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 lambda2 #s(literal -6456360425798343/576460752303423488 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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal -5606327030934153/74751027079122046462216955587793573067050655862760405902609490213261724339546970300512875500623813013973275600053770769378323738155015176163371603062328757260320680744718580942157810765768356265984 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))))) (if (<=.f64 lambda2 #s(literal 2966120754499563/9568131466127621947163770315237577352582483950433331955534014747297500715462012198465648064079848065788579276806882658480425438483841942548911565191978080929321047135323978360596199778018349602045952 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))))) (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 lambda2 #s(literal -6456360425798343/576460752303423488 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)) #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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
(if (<=.f64 lambda2 #s(literal -6456360425798343/576460752303423488 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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.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 (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 lambda2 #s(literal -8231177221447645/93536104789177786765035829293842113257979682750464 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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)))))) (if (<=.f64 lambda2 #s(literal 27000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.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 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.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))))))))
(if (<=.f64 lambda2 #s(literal -8231177221447645/93536104789177786765035829293842113257979682750464 binary64)) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 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 lambda2 #s(literal 27000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (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 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 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 phi2 #s(literal -120000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.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)))))) (if (<=.f64 phi2 #s(literal 4400000000000000 binary64)) (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 (*.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 (*.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 phi2 #s(literal -120000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 lambda1) (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 phi2 #s(literal 4400000000000000 binary64)) (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 (*.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 (sin.f64 lambda1) (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 #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)))))
(if (<=.f64 phi2 #s(literal 6456360425798343/9223372036854775808 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (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) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))))
(if (<=.f64 phi2 #s(literal 6456360425798343/9223372036854775808 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (sin.f64 phi1))))))
(if (<=.f64 phi2 #s(literal 2476979795053773/1125899906842624 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 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 #s(approx (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
(if (<=.f64 phi2 #s(literal 2476979795053773/1125899906842624 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (/.f64 (*.f64 #s(approx (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) #s(literal 0 binary64)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
(if (<=.f64 phi2 #s(literal 720000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))))
(if (<=.f64 phi2 #s(literal 720000000000000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (fma.f64 (cos.f64 phi1) phi2 #s(literal 0 binary64)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (sin.f64 phi2))))
(if (<=.f64 phi1 #s(literal -7707315649387635/10141204801825835211973625643008 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 1077503010193995/316912650057057350374175801344 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64)))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(if (<=.f64 phi1 #s(literal -7707315649387635/10141204801825835211973625643008 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2))))) (if (<=.f64 phi1 #s(literal 1077503010193995/316912650057057350374175801344 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (sin.f64 phi2))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (*.f64 (neg.f64 (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (-.f64 (sin.f64 phi2) #s(literal 0 binary64))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) #s(approx (- (* (cos phi1) (sin phi2)) (/ (* (+ (sin (+ phi1 phi2)) (sin (- phi1 phi2))) (cos (- lambda1 lambda2))) 2)) (sin.f64 phi2)))

soundness2.1s (7.7%)

Memory
28.3MiB live, 1 898.4MiB allocated
Rules
14 368×lower-fma.f64
14 368×lower-fma.f32
11 752×lower-fma.f64
11 752×lower-fma.f32
9 498×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075415964
1263815327
2542415299
3793715299
0826414840
02452709
17682627
223572552
344122551
081392499
01752
03052
19152
259752
3722552
0808952
059358
0107348
1323330
22589306
010149303
058711239
1197810784
2608210707
0849110507
079464
0142438
1496404
23994392
08211386
097118337
1341517639
2729917487
0820516991
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 5 270 to 2 196 computations (58.3% saved)

preprocess225.0ms (0.8%)

Memory
1.3MiB live, 272.6MiB allocated
Compiler

Compiled 3 394 to 512 computations (84.9% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...