Bearing on a great circle

Time bar (total: 26.6s)

start0.0ms (0%)

Memory
0.1MiB live, 0.1MiB allocated

analyze881.0ms (3.3%)

Memory
36.8MiB live, 1 172.9MiB 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)

sample7.0s (26.2%)

Memory
-209.1MiB live, 7 102.0MiB allocated
Samples
5.7s5 765×1valid
505.0ms2 491×0valid
Precisions
Click to see histograms. Total time spent on operations: 5.7s
ival-sin: 2.0s (34.6% of total)
ival-cos: 1.9s (32.4% of total)
ival-mult: 1.1s (19.6% of total)
adjust: 420.0ms (7.3% of total)
ival-sub: 187.0ms (3.3% of total)
ival-atan2: 158.0ms (2.8% of total)
ival-true: 7.0ms (0.1% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain432.0ms (1.6%)

Memory
9.5MiB live, 677.8MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
73123(-1.1705296313567436e+68 -5.408815255546533e-70 -9.162891396184912e+97 -4.775718922801654e+67)0-(sin.f64 (-.f64 lambda1 lambda2))
73123(-1.1705296313567436e+68 -5.408815255546533e-70 -9.162891396184912e+97 -4.775718922801654e+67)0-(cos.f64 (-.f64 lambda1 lambda2))
00-0-(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
00-0-(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
00-0-lambda2
00-0-phi2
00-0-(*.f64 (sin.f64 phi1) (cos.f64 phi2))
00-0-(-.f64 lambda1 lambda2)
00-0-(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
00-0-(sin.f64 phi1)
00-0-(cos.f64 phi2)
00-0-lambda1
00-0-phi1
00-0-(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
00-0-(sin.f64 phi2)
00-0-(*.f64 (cos.f64 phi1) (sin.f64 phi2))
00-0-(cos.f64 phi1)
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
cos.f64(cos.f64 (-.f64 lambda1 lambda2))sensitivity1960
sin.f64(sin.f64 (-.f64 lambda1 lambda2))sensitivity1960
Confusion
Predicted +Predicted -
+650
-13160
Precision
0.33163265306122447
Recall
1.0
Confusion?
Predicted +Predicted MaybePredicted -
+6500
-131060
Precision?
0.33163265306122447
Recall?
1.0
Freqs
test
numberfreq
060
2196
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
263.0ms364×1valid
29.0ms148×0valid
Compiler

Compiled 212 to 55 computations (74.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 250.0ms
ival-sin: 97.0ms (38.8% of total)
ival-cos: 95.0ms (38% of total)
ival-mult: 22.0ms (8.8% of total)
adjust: 17.0ms (6.8% of total)
ival-sub: 9.0ms (3.6% of total)
ival-atan2: 9.0ms (3.6% of total)
ival-true: 1.0ms (0.4% of total)
ival-assert: 0.0ms (0% of total)

preprocess161.0ms (0.6%)

Memory
-0.6MiB live, 80.0MiB 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 28 to 17 computations (39.3% saved)

eval0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated
Compiler

Compiled 4 to 4 computations (0% saved)

prune1.0ms (0%)

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

Compiled 28 to 17 computations (39.3% saved)

simplify25.0ms (0.1%)

Memory
3.2MiB live, 40.5MiB 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))

localize178.0ms (0.7%)

Memory
1.8MiB live, 359.0MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy0.16015625
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
accuracy0.234375
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy16.03830952294618
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.184270107387512
(sin.f64 (-.f64 lambda1 lambda2))
Samples
140.0ms182×1valid
18.0ms74×0valid
Compiler

Compiled 92 to 19 computations (79.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 139.0ms
ival-cos: 55.0ms (39.5% of total)
ival-sin: 53.0ms (38.1% of total)
ival-mult: 14.0ms (10.1% of total)
adjust: 8.0ms (5.7% of total)
ival-sub: 5.0ms (3.6% of total)
ival-atan2: 4.0ms (2.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series28.0ms (0.1%)

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

12 calls:

TimeVariablePointExpression
4.0ms
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))))
3.0ms
lambda2
@-inf
((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.0ms
lambda1
@inf
((atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (- lambda1 lambda2) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
2.0ms
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))))

simplify206.0ms (0.8%)

Memory
0.2MiB live, 206.0MiB 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 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 phi2)) (*.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 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 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(+ (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 lambda1 (*.f64 #s(literal -1/6 binary64) lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.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 (neg.f64 (sin.f64 lambda2)) (fma.f64 lambda1 (*.f64 #s(literal 1/6 binary64) lambda1) #s(literal -1 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64))) 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 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 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 (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 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 lambda2)))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (cos.f64 lambda1) (fma.f64 lambda2 (*.f64 #s(literal 1/6 binary64) lambda2) #s(literal -1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64)) lambda2)) 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 lambda2 (*.f64 #s(literal -1/6 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64))) 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 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (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 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)))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.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)))))
(+ (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 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (*.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 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (*.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 (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (*.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))

rewrite216.0ms (0.8%)

Memory
-28.9MiB live, 290.3MiB 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 (-.f64 lambda1 lambda2))))))) #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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2)))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(/.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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 (-.f64 lambda1 lambda2))))))) (*.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))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (-.f64 (-.f64 lambda1 lambda2) phi2))))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (*.f64 (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))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) (-.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))))
(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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (sin.f64 (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (/.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))))
(-.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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(*.f64 (/.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)))
(*.f64 (/.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 lambda1 lambda1)) lambda1 (*.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (*.f64 (+.f64 lambda2 lambda1) lambda2)) (*.f64 (+.f64 lambda2 lambda1) lambda2)))) (fma.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (-.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(*.f64 (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (neg.f64 (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2)) (/.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) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(*.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) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(*.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (*.f64 (*.f64 lambda2 lambda2) lambda2)) (*.f64 (*.f64 lambda2 lambda2) lambda2))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (fma.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1))))
(/.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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (fma.f64 (*.f64 lambda1 lambda1) (/.f64 lambda1 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (fma.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (*.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2))) (neg.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (+.f64 lambda2 lambda1))
(/.f64 (*.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (*.f64 (*.f64 lambda2 lambda2) lambda2)) (*.f64 (*.f64 lambda2 lambda2) lambda2))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1))) (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda2 lambda2) lambda2))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (*.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 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (*.f64 (*.f64 lambda2 lambda2) lambda2)) (*.f64 (*.f64 lambda2 lambda2) lambda2))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (*.f64 lambda1 lambda1) lambda1)))))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 lambda2 lambda1) (fma.f64 (*.f64 lambda2 lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1)))))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2)) (neg.f64 (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2)) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 lambda2 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) lambda1))))
(/.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (-.f64 (neg.f64 lambda2) lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))
(neg.f64 (/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (+.f64 lambda2 lambda1)))
(neg.f64 (/.f64 (*.f64 (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (-.f64 lambda1 lambda2)) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))
(neg.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 lambda2 lambda1))))
(neg.f64 (/.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (neg.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) lambda2)) (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (*.f64 lambda1 lambda1)) lambda1 (*.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (*.f64 (+.f64 lambda2 lambda1) lambda2)) (*.f64 (+.f64 lambda2 lambda1) lambda2)))) (fma.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (-.f64 (*.f64 (+.f64 lambda2 lambda1) lambda2) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 lambda1))) (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (/.f64 (*.f64 lambda1 lambda1) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(fma.f64 (/.f64 (*.f64 lambda1 lambda1) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (-.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 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))
(fma.f64 (*.f64 lambda1 lambda1) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (neg.f64 (*.f64 lambda2 (/.f64 lambda2 (+.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))) (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 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))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (fma.f64 (*.f64 (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (+.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))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (*.f64 (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (neg.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))))
(-.f64 (*.f64 (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
(/.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)))

eval114.0ms (0.4%)

Memory
14.6MiB live, 220.0MiB allocated
Compiler

Compiled 20 510 to 1 714 computations (91.6% saved)

prune203.0ms (0.8%)

Memory
-9.3MiB live, 347.7MiB allocated
Pruning

45 alts after pruning (45 fresh and 0 done)

PrunedKeptTotal
New49245537
Fresh000
Picked101
Done000
Total49345538
Accuracy
88.0%
Counts
538 → 45
Alt Table
Click to see full alt table
StatusAccuracyProgram
87.4%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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)))))
67.1%
(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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
77.4%
(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)))))
78.9%
(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)))))
87.4%
(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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
87.4%
(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)))))
74.0%
(atan2.f64 (*.f64 (/.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))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 (*.f64 (*.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)))))) (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.5%
(atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.9%
(atan2.f64 (*.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (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)))))
75.5%
(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)))))
18.8%
(atan2.f64 (*.f64 (sin.f64 (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 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.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))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))))
77.4%
(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))))))
66.1%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (cos.f64 (-.f64 lambda1 lambda2))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
77.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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))) (cos.f64 (+.f64 lambda2 lambda1))))))
77.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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (cos.f64 (+.f64 lambda2 lambda1)))))))
64.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
68.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 lambda2)))))
67.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
77.4%
(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))))
53.1%
(atan2.f64 (*.f64 (sin.f64 (-.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.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 (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)))))))
42.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 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
47.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 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
66.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
41.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.4%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (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.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.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)))))
59.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/6 binary64) lambda1) #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.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)))))
57.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (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)))))
59.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
57.6%
(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)))))
58.4%
(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)))))
46.3%
(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)))))
57.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (fma.f64 lambda2 (*.f64 #s(literal -1/2 binary64) lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
47.3%
(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)))))
44.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (+.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)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
49.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 3 726 to 2 210 computations (40.7% saved)

simplify142.0ms (0.5%)

Memory
28.1MiB live, 143.6MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(-.f64 lambda1 lambda2)
cost-diff0
(sin.f64 (-.f64 lambda1 lambda2))
cost-diff0
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
cost-diff0
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
cost-diff128
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
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 854×lower-fma.f32
9 846×lower-fma.f64
3 016×lower-*.f32
2 990×lower-*.f64
1 664×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
055683
0102679
1163677
2335677
3932677
42581677
54968677
66498677
77788677
08032673
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(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64))
lambda1
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda2) lambda1)
(cos.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
(cos.f64 (-.f64 lambda1 lambda2))
#s(literal 1/2 binary64)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)
Outputs
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(fma.f64 (*.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))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(atan2.f64 (*.f64 (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)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.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 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
lambda1
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))
lambda1
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda2) lambda1)
(*.f64 lambda1 (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda1 lambda2)
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(fma.f64 (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))
(cos.f64 (+.f64 lambda2 lambda1))
(cos.f64 (+.f64 lambda1 lambda2))
(+.f64 lambda2 lambda1)
(+.f64 lambda1 lambda2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
#s(literal 1/2 binary64)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
(sin.f64 lambda1)

localize549.0ms (2.1%)

Memory
-27.9MiB live, 814.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.234375
(*.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))))
accuracy16.038309522946193
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.168754151145453
(cos.f64 (+.f64 lambda2 lambda1))
accuracy16.184270107387515
(sin.f64 (-.f64 lambda1 lambda2))
accuracy0.234375
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy3.294141095782939
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
accuracy16.038309522946193
(cos.f64 (-.f64 lambda1 lambda2))
accuracy32.11532636669742
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
accuracy0.234375
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy16.038309522946193
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.184270107387512
(sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))
accuracy31.00178205824983
#s(approx (- lambda1 lambda2) (neg.f64 lambda2))
accuracy0.234375
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy16.038309522946193
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.184270107387515
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.200629785800462
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.1640625
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
accuracy0.18816376953688402
(fma.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.234375
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy16.038309522946193
(cos.f64 (-.f64 lambda1 lambda2))
Samples
375.0ms179×1valid
47.0ms77×0valid
Compiler

Compiled 627 to 49 computations (92.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 321.0ms
ival-sin: 139.0ms (43.3% of total)
ival-cos: 87.0ms (27.1% of total)
ival-mult: 36.0ms (11.2% of total)
adjust: 23.0ms (7.2% of total)
ival-atan2: 15.0ms (4.7% of total)
ival-add: 11.0ms (3.4% of total)
ival-sub: 6.0ms (1.9% of total)
ival-neg: 3.0ms (0.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series159.0ms (0.6%)

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

12 calls:

TimeVariablePointExpression
60.0ms
lambda2
@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) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
11.0ms
phi1
@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) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
10.0ms
lambda2
@-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) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin 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) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
5.0ms
lambda1
@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) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2)) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))

simplify277.0ms (1%)

Memory
-27.2MiB live, 286.9MiB allocated
Algorithm
egg-herbie
Rules
14 844×lower-fma.f64
14 844×lower-fma.f32
8 122×lower-*.f64
8 122×lower-*.f32
2 980×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058713724
1200613149
2690813080
0855612770
Stop Event
iter limit
node limit
Counts
780 → 773
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)
(* -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) (* 1/2 (* 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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(* -1 (* (cos 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)))))))))
(cos lambda2)
(+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(+ (* -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))))
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos 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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos lambda1) (* (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))))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* -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)))
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (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))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* -1 (* (cos 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))))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (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))
lambda1
(+ lambda1 (* -1 (* lambda2 (+ 1 (* -1/2 (pow lambda1 2))))))
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* -1/2 (* lambda1 lambda2)))))
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 (* lambda2 (+ 1 (* -1/2 (pow lambda1 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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(* -1 (* 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))))))))))
(cos lambda1)
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* -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))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -1 (* (cos lambda1) (* (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))))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* -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)))))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (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)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* -1 (* (cos lambda1) (* (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))))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(+ (* -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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(* (cos (- lambda1 lambda2)) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))))))
(+ (* (cos (- lambda1 lambda2)) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos (- lambda1 lambda2)) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos (- lambda1 lambda2)) (sin phi1)))) (* 1/24 (* (cos (- lambda1 lambda2)) (sin phi1))))))))
(* -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)))))))))
(* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(+ (* -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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -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))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* -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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* -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))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(atan2 (+ (* -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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(* phi1 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))))
(atan2 (+ (* -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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(atan2 (+ (* -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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
Outputs
(* -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 lambda1 lambda1) #s(literal 1/2 binary64) #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 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(atan2 (+ (* -1 (* (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)))))))
(*.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 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1)) (*.f64 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 (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 lambda1 lambda1) #s(literal 1/2 binary64) #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 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (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 lambda1 lambda1) #s(literal 1/2 binary64) #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 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(* -1 (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 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (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 (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 lambda1 lambda1) #s(literal 1/2 binary64) #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 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(sin (neg lambda2))
(neg.f64 (sin.f64 lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.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 lambda1 lambda1) #s(literal 1/2 binary64) #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 lambda1 lambda1) (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda1 (cos.f64 phi2))) (cos.f64 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda2))) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda2) lambda1 (neg.f64 (sin.f64 lambda2)))))
(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 #s(literal -1/2 binary64) (cos.f64 lambda2) (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal -1/6 binary64))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (sin.f64 phi1) (*.f64 (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 (sin.f64 phi1) (*.f64 (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 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) #s(literal -1/2 binary64)))) lambda1)) lambda1 (*.f64 (sin.f64 phi1) (*.f64 (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 lambda1 lambda1) #s(literal 1/2 binary64) #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 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/720 binary64) (*.f64 lambda1 lambda1) #s(literal -1/24 binary64))) (*.f64 lambda1 lambda1)) (*.f64 lambda1 lambda1)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))
(fma.f64 (neg.f64 lambda1) (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/6 binary64) (*.f64 lambda1 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 phi1)))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 #s(literal 2 binary64) (cos.f64 lambda2))) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (*.f64 (neg.f64 (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))) lambda1))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (fma.f64 #s(literal -1/6 binary64) (sin.f64 lambda2) #s(literal 0 binary64))) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (neg.f64 (cos.f64 lambda2))) (sin.f64 phi1))) lambda1)) lambda1 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1))))
(+ (* -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)
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(*.f64 (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 1/2 binary64)) lambda1)
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1) lambda1)
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) (/.f64 (sin.f64 lambda2) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
(*.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) (/.f64 (sin.f64 lambda2) (*.f64 lambda1 lambda1))) (*.f64 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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos lambda1) (* (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)))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 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 (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)
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(*.f64 (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 1/2 binary64)) lambda1)
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) lambda1) lambda1)
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))
(*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (-.f64 (/.f64 (sin.f64 lambda2) lambda1) (cos.f64 lambda2)) (neg.f64 lambda1))) lambda1) lambda1)
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))
(*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (-.f64 (/.f64 (sin.f64 lambda2) lambda1) (cos.f64 lambda2)) (neg.f64 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 (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))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.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) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.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) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.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) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos 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)))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 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 (*.f64 #s(literal -1/2 binary64) 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 (*.f64 (*.f64 (sin.f64 lambda1) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2)) (*.f64 lambda2 lambda2)))
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 (*.f64 #s(literal -1/2 binary64) 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 (neg.f64 (cos.f64 lambda1)) lambda2 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (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 (*.f64 #s(literal -1/2 binary64) 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 (neg.f64 (cos.f64 lambda1)) lambda2 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (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)
lambda1
(+ lambda1 (* -1 (* lambda2 (+ 1 (* -1/2 (pow lambda1 2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1)
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* -1/2 (* lambda1 lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal -1/2 binary64) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64))) lambda2 lambda1)
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 (* lambda2 (+ 1 (* -1/2 (pow lambda1 2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64))) 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 (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 (*.f64 #s(literal -1/2 binary64) 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 (neg.f64 (cos.f64 lambda1)) lambda2 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (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) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.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 (*.f64 #s(literal -1/2 binary64) 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)))
(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 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (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))
(* -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 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (fma.f64 #s(literal 1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal -1/120 binary64))) (*.f64 lambda2 lambda2)) (*.f64 lambda2 lambda2))) lambda2)
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(fma.f64 (neg.f64 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(fma.f64 (fma.f64 (*.f64 lambda2 #s(literal -1/2 binary64)) (cos.f64 lambda1) (neg.f64 (sin.f64 lambda1))) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda1))) lambda2 (neg.f64 (sin.f64 lambda1))) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))
(+ (* lambda2 (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.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)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 lambda2 (cos.f64 phi2))) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)) (*.f64 (*.f64 (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))
(+ (* -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)
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (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 (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos lambda1) (* (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)))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 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 (* -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)
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(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))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* -1 (* (cos lambda1) (* (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)))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))
(+ (* -1 (* (cos lambda1) (sin lambda2))) (+ (* (cos lambda2) (sin lambda1)) (* (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 (*.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 phi2 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 (*.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 phi2 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 (*.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 phi2 phi2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.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 (*.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 phi2 phi2)))
(* (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 (*.f64 (*.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 phi2 phi2)) (*.f64 phi2 phi2)))
(* -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 (*.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal 1/720 binary64) (*.f64 phi2 phi2) #s(literal -1/24 binary64))) (*.f64 phi2 phi2)) (*.f64 phi2 phi2)))
(* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (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 (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))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (*.f64 (*.f64 (*.f64 phi2 phi2) (*.f64 phi2 phi2)) (*.f64 (*.f64 (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))) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64)))))
(+ (* -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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.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)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.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)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.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)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (*.f64 (*.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))) phi1)
(* phi1 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (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))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))))
(*.f64 (fma.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (*.f64 (*.f64 (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))) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (*.f64 (neg.f64 (cos.f64 phi2)) (sin.f64 phi1)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))) (cos.f64 phi2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))

rewrite186.0ms (0.7%)

Memory
32.0MiB live, 256.2MiB allocated
Rules
4 766×lower-*.f32
4 740×lower-*.f64
3 442×lower-/.f64
3 442×lower-/.f32
3 354×lower-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
055342
0102346
1304322
22303322
08319322
Stop Event
iter limit
node limit
iter limit
Counts
23 → 354
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))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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))))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))
(cos.f64 (+.f64 lambda2 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
Outputs
(*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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) (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 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.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))
(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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(literal 2 binary64))
(/.f64 (-.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 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(/.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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))
(/.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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))))
(/.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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))))
(/.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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 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 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(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 #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 (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 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 (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 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 (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 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 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 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.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 (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (+.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)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2))) (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2)))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(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 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(/.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 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)))) (neg.f64 (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 lambda2 lambda2) lambda2))) (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (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 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda1 lambda1 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (neg.f64 lambda2))))))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 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 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2)) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.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 (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))))
(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 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 lambda2 lambda1)) (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 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))))
(*.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))))))
(pow.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))) (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)))) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)))) (neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1))) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))) (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))) (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 lambda1 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 (cos.f64 lambda2) lambda1 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))))
(-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (sin.f64 lambda2)))
(+.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2)))
(+.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 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(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2)))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 lambda1 (cos.f64 lambda2))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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) (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 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.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))
(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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))) #s(literal 2 binary64))
(/.f64 (-.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 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))
(/.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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))
(/.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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))))))
(/.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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (cos.f64 phi2)) #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 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))))))))
(/.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))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2))) (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 (-.f64 lambda1 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 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))))
(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 #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 (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))))
(/.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (cos.f64 (+.f64 lambda1 lambda2))))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (fma.f64 (neg.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 (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 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 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 (cos.f64 lambda2) (cos.f64 (neg.f64 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 (neg.f64 lambda1))))
(-.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 lambda2 lambda1))
(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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda1 lambda1 (*.f64 lambda2 (+.f64 lambda1 lambda2)))))))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.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 lambda2 lambda1))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (+.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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (cos.f64 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)))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (*.f64 (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 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (neg.f64 (cos.f64 (-.f64 lambda2 lambda1))))
(/.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)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal -4 binary64))
(/.f64 (-.f64 (*.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 (-.f64 (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 (-.f64 lambda2 lambda1)))
(/.f64 (-.f64 (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)) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 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 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (sin.f64 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 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))))) (neg.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (neg.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))))) (neg.f64 (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))))) (neg.f64 (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))))))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))) #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2)))))) #s(literal 8 binary64))
(/.f64 (fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda1 lambda2))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 8 binary64))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 3 binary64)) #s(literal 1/8 binary64) (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1))) #s(literal 2 binary64)))
(/.f64 (*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2)))) (*.f64 (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 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)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) #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)) (sin.f64 phi1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (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 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (cos.f64 phi2)) (sin.f64 phi1) (*.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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 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 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))))) (*.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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 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)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1)))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))

eval366.0ms (1.4%)

Memory
-2.4MiB live, 605.7MiB allocated
Compiler

Compiled 73 281 to 2 884 computations (96.1% saved)

prune706.0ms (2.7%)

Memory
-10.1MiB live, 716.7MiB allocated
Pruning

89 alts after pruning (89 fresh and 0 done)

PrunedKeptTotal
New1 828671 895
Fresh182240
Picked505
Done000
Total1 851891 940
Accuracy
99.9%
Counts
1 940 → 89
Alt Table
Click to see full alt table
StatusAccuracyProgram
87.4%
(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)))))
87.4%
(atan2.f64 (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))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
75.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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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))))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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)) (/.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 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
75.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 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) lambda1))))))
78.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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)))))
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 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
56.3%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
76.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
79.5%
(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)))))
78.8%
(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)))))
75.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
77.4%
(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)))))
87.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)) (*.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))))))
87.4%
(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)))))
83.8%
(atan2.f64 (*.f64 (/.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))))) (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))))))
75.5%
(atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.9%
(atan2.f64 (*.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (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)))))
33.3%
(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)))))
75.5%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (/.f64 #s(literal 1 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 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.5%
(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)))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
77.4%
(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))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
69.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
67.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
77.4%
(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))))
53.1%
(atan2.f64 (*.f64 (sin.f64 (-.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.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 (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)))))))
42.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 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
47.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 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
66.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
41.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.4%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (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.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (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.0%
(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)))))
42.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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
47.4%
(atan2.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))))))
46.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
47.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)))))
36.7%
(atan2.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)))))
34.9%
(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.8%
(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 (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.8%
(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))))))
47.2%
(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) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
42.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
56.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
60.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))))))
39.4%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (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 (*.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))) phi1))))
39.4%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
40.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (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)))))
36.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (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)))))
43.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 lambda1 (cos.f64 lambda2))) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.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)) (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))))))
46.3%
(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)))))
33.4%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64))) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
40.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
13.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (*.f64 (*.f64 (*.f64 lambda1 (sin.f64 lambda2)) #s(literal 1/2 binary64)) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
58.4%
(atan2.f64 #s(approx (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (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)))))
48.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)))))
52.8%
(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)))))
47.3%
(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)))))
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 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (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 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (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))))))
49.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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 (+.f64 lambda1 lambda2))))))
43.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) 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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 lambda1 (sin.f64 lambda2) (cos.f64 lambda2))))))
44.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)) (cos.f64 lambda2)))))
42.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
29.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.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.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
49.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) (cos.f64 (-.f64 lambda2 lambda1))))))
17.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2))) (fma.f64 lambda1 (-.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
31.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (-.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 #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)))))
42.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)))))
33.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
39.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) #s(literal -1/2 binary64) #s(literal 1 binary64)) (sin.f64 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
39.1%
(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)))))
31.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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
Compiler

Compiled 6 974 to 4 158 computations (40.4% saved)

simplify136.0ms (0.5%)

Memory
-8.6MiB live, 184.7MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
cost-diff128
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
cost-diff6080
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
cost-diff0
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
cost-diff128
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
cost-diff0
(sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))
cost-diff0
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))
cost-diff0
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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-diff1728
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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)) #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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
cost-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-diff13440
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
Rules
10 390×lower-fma.f32
10 376×lower-fma.f64
3 820×lower-*.f32
3 780×lower-*.f64
1 878×lower-+.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
075978
0139944
1235925
2498917
31319917
43358913
55852913
08162898
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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(fma.f64 (*.f64 (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))
(sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))
(+.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 lambda1 lambda2)
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))
#s(literal 1 binary64)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(*.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64))
lambda1
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda2) 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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))
(*.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)
(*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 phi1 phi1)
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64))
lambda1
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda2) lambda1)
(cos.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2))) (cos.f64 phi2)) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(fma.f64 (*.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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (cos.f64 lambda2))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
(sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))
(sin.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(-.f64 lambda1 lambda2)
(*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))
(+.f64 lambda1 lambda2)
lambda1
lambda2
(-.f64 lambda1 lambda2)
(/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))
#s(literal 1 binary64)
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 phi2)
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (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(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (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)) phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))
lambda1
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda2) lambda1)
(*.f64 lambda1 (cos.f64 lambda2))
(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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))
(-.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)) phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))))
(*.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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)) phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
(*.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)
(*.f64 (*.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)))
(*.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 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (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))
(fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))
#s(literal -1/6 binary64)
(*.f64 phi1 phi1)
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))
(cos.f64 (-.f64 lambda2 lambda1))
(-.f64 lambda2 lambda1)
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2))))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) lambda1 #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64))
(fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))
lambda1
(*.f64 #s(literal -1/2 binary64) lambda1)
#s(literal -1/2 binary64)
#s(literal 1 binary64)
(neg.f64 (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(*.f64 (cos.f64 lambda2) lambda1)
(*.f64 lambda1 (cos.f64 lambda2))
(cos.f64 lambda2)
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))
(-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) lambda1)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (cos.f64 lambda2) (*.f64 (sin.f64 lambda2) lambda1))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2))
(fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2))

localize601.0ms (2.3%)

Memory
20.0MiB live, 697.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.234375
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))
accuracy3.29414109578294
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
accuracy32.11532636669742
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
accuracy32.146554955710286
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
accuracy3.29414109578294
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
accuracy16.038309522946175
(cos.f64 (-.f64 lambda2 lambda1))
accuracy32.11532636669742
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
accuracy32.47322285932829
#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))
accuracy16.03830952294618
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.184270107387512
(sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))
accuracy28.200629785800462
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))
accuracy28.274927924300414
(*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
accuracy16.038309522946175
(cos.f64 (-.f64 lambda2 lambda1))
accuracy16.184270107387512
(sin.f64 (-.f64 lambda1 lambda2))
accuracy28.04514744348834
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy28.200629785800462
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2)))
accuracy0.18816376953688402
(fma.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.2421875
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
accuracy0.244472509768442
(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)))
accuracy0.26953125
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
Samples
355.0ms190×1valid
90.0ms66×0valid
Compiler

Compiled 740 to 63 computations (91.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 364.0ms
ival-cos: 111.0ms (30.5% of total)
ival-mult: 93.0ms (25.6% of total)
ival-sin: 80.0ms (22% of total)
adjust: 24.0ms (6.6% of total)
ival-add: 17.0ms (4.7% of total)
ival-atan2: 14.0ms (3.8% of total)
const: 10.0ms (2.7% of total)
ival-sub: 8.0ms (2.2% of total)
ival-div: 5.0ms (1.4% of total)
ival-neg: 2.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series113.0ms (0.4%)

Memory
17.4MiB live, 210.0MiB allocated
Counts
26 → 924
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt (fma.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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())
#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())
#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())
#s(alt #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 (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())
#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())
Outputs
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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 (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (sin lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (cos lambda2))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (sin lambda2))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (cos phi2) (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda2) (sin phi1)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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 lambda1 (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow lambda1 2) (sin lambda2))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow lambda1 2) (cos lambda2))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (- 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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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 lambda1 (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (pow lambda1 2) (sin lambda2))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (pow lambda1 2) (cos lambda2))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2)))) (taylor -inf lambda1) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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 lambda1 (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 (* lambda2 (+ 1 (* -1/2 (pow lambda1 2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* -1/2 (* lambda1 lambda2))))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 (* lambda2 (+ 1 (* -1/2 (pow lambda1 2)))))))))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/2 (pow lambda1 2))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2)))))) (taylor 0 lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin phi1)))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/120 (* (cos phi2) (sin phi1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (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) (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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 (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (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 (- 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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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 (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) (patch (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)) (patch (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2)))))) (taylor -inf lambda2) (#s(alt (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)) (patch (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (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 (+ 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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (patch #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (sin lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos (- lambda1 lambda2)) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) 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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (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 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (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 (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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (sin lambda2))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (cos (- lambda1 lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (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 (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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) (patch (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) (patch (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (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 (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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) (patch (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)) (patch #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)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
9.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) (* (* (+ lambda1 lambda2) (- lambda1 lambda2)) (/ 1 (+ 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)) (/ 1 (+ lambda1 lambda2)))) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
8.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) (* (* (+ lambda1 lambda2) (- lambda1 lambda2)) (/ 1 (+ 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)) (/ 1 (+ lambda1 lambda2)))) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
6.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) (* (* (+ lambda1 lambda2) (- lambda1 lambda2)) (/ 1 (+ 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)) (/ 1 (+ lambda1 lambda2)))) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
6.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) (* (* (+ lambda1 lambda2) (- lambda1 lambda2)) (/ 1 (+ 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)) (/ 1 (+ lambda1 lambda2)))) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))
5.0ms
phi1
@0
((+ (* (* (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) (* (* (+ lambda1 lambda2) (- lambda1 lambda2)) (/ 1 (+ 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)) (/ 1 (+ lambda1 lambda2)))) (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) 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)) (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1)) (* (* (sin phi1) (cos phi2)) (sin lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))

simplify482.0ms (1.8%)

Memory
-4.0MiB live, 301.6MiB allocated
Algorithm
egg-herbie
Rules
9 330×lower-fma.f64
9 330×lower-fma.f32
5 592×lower-+.f64
5 592×lower-+.f32
5 070×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
066015997
1229015415
2446415375
3721115367
0817014949
Stop Event
iter limit
node limit
Counts
924 → 917
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)
(* -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 (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) (* 1/2 (* 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 (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 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* 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 (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* -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))))
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))
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos 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))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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) (* (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 (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* -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)))
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 (* -1 (+ lambda2 (* -1 lambda1))))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (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))))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(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 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 (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos (neg (+ lambda2 (* -1 lambda1))))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(* (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))
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 (+ 1 (* -1/2 (pow lambda1 2))))))
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* -1/2 (* lambda1 lambda2)))))
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 (* lambda2 (+ 1 (* -1/2 (pow lambda1 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))))))))
(+ 1 (* -1/2 (pow lambda1 2)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1)))))
(* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1)))))))))
(* lambda2 (+ (* (cos phi2) (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin phi1))))))))))
(* lambda2 (* (cos phi2) (sin phi1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1))))
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin phi1))))))))
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/120 (* (cos phi2) (sin phi1)))))))))
(* (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 lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* -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))
(* -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 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (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))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (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 (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos (- lambda1 lambda2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* -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)))))
(* -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 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (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)))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(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) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (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 (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(cos (+ lambda1 (* -1 lambda2)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))))))
(+ (* -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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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) (* (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)))))))))
(* (sin lambda2) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))))))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (sin lambda2) (sin phi1))))))))
(* (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))))))))
(* (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) (* (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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (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) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* -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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (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) (* (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)))
(* 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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* phi1 (* (cos phi2) (* (sin 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) (sin lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin lambda2))))))))
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(* phi1 (* (cos phi2) (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 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))))))))))
(+ (* (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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (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) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(atan2 (+ (* -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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (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) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(* (cos phi2) (* (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) (* (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
(* (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 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 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/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (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 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) #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)
(* -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 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 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/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (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 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64))) lambda1 (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 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(+ (* -1 (sin lambda2)) (* lambda1 (+ (cos lambda2) (* 1/2 (* lambda1 (sin lambda2))))))
(fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/2 binary64) (cos.f64 lambda2)) lambda1 (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 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/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (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 #s(literal 1/2 binary64) (sin.f64 lambda2) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/6 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* lambda1 (sin lambda2)))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos 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 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (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)) (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))))
(* 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 (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (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 (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (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 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 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))
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)
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 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))
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64)) (sin.f64 lambda2))
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda2) (+.f64 (/.f64 #s(literal -1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (cos.f64 lambda2) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1 (/ (sin lambda2) (pow lambda1 2))) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1))))
(*.f64 (fma.f64 (sin.f64 lambda2) (+.f64 (/.f64 #s(literal -1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (cos.f64 lambda2) lambda1)) (*.f64 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 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))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (cos.f64 lambda2))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (+ (/ (cos lambda2) (pow lambda1 2)) (/ (sin lambda2) lambda1))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)) (*.f64 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 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) (* (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 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))
(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))
(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))
(+ (* (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 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))
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)
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 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 (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(* 1/2 (* (pow lambda1 2) (sin lambda2)))
(*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64)) (sin.f64 lambda2))
(* (pow lambda1 2) (+ (* 1/2 (sin lambda2)) (/ (cos lambda2) lambda1)))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (sin.f64 lambda2) (/.f64 (cos.f64 lambda2) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))
(*.f64 (fma.f64 (sin.f64 lambda2) (+.f64 (/.f64 #s(literal -1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (cos.f64 lambda2) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (cos lambda2)) (/ (sin lambda2) lambda1)) lambda1)) (* 1/2 (sin lambda2))))
(*.f64 (fma.f64 (sin.f64 lambda2) (+.f64 (/.f64 #s(literal -1 binary64) (*.f64 lambda1 lambda1)) #s(literal 1/2 binary64)) (/.f64 (cos.f64 lambda2) lambda1)) (*.f64 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 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))
(* -1/2 (* (pow lambda1 2) (cos lambda2)))
(*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (cos.f64 lambda2))
(* (pow lambda1 2) (+ (* -1/2 (cos lambda2)) (/ (sin lambda2) lambda1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (sin.f64 lambda2) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (sin lambda2)) (* -1 (/ (cos lambda2) lambda1))) lambda1)) (* -1/2 (cos lambda2))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 lambda2) (/.f64 (+.f64 (/.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1)) (*.f64 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 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 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 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))
(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 (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 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 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)))
(*.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)
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 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)))
(*.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 (+ 1 (* -1/2 (pow lambda1 2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1)
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* -1/2 (* lambda1 lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal -1/2 binary64) (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64))) lambda2 lambda1)
(+ lambda1 (* lambda2 (+ (* -1 (+ 1 (* -1/2 (pow lambda1 2)))) (* lambda2 (+ (* -1/2 lambda1) (* 1/6 (* lambda2 (+ 1 (* -1/2 (pow lambda1 2))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64))) 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 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)))
(*.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))
(+ 1 (* -1/2 (pow lambda1 2)))
(fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda1 lambda2)))
(fma.f64 lambda1 lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (* 1/4 (pow lambda1 2)) 1/2))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) lambda2 lambda1) lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)))
(+ 1 (+ (* -1/2 (pow lambda1 2)) (* lambda2 (+ lambda1 (* lambda2 (- (+ (* -1/6 (* lambda1 lambda2)) (* 1/4 (pow lambda1 2))) 1/2))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal -1/6 binary64) (fma.f64 #s(literal 1/4 binary64) (*.f64 lambda1 lambda1) #s(literal -1/2 binary64))) lambda2 lambda1) lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #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 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))))
(* 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)
(* lambda2 (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 lambda2 (cos.f64 phi2)) (sin.f64 phi1))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (cos phi2) (sin phi1))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) lambda2)
(* lambda2 (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/120 (* (cos phi2) (sin phi1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) lambda2)
(* (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.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (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.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (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 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))
(* -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 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 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))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.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 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 lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos 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 (+ (sin lambda2) (* -1/2 (* lambda1 (cos 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 (+ (sin lambda2) (* -1/2 (* lambda1 (cos 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 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (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)) (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) (* (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) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (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))
(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))
(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))
(+ (* (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 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))
(* -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 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 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))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 lambda1 (cos.f64 lambda2)))
(+ (* -1 (* (sin lambda2) (+ 1 (* -1/2 (pow lambda1 2))))) (* lambda1 (cos lambda2)))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) (sin.f64 lambda2) (*.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 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 lambda2) (* lambda1 (+ (sin lambda2) (* -1/2 (* lambda1 (cos 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 (+ (sin lambda2) (* -1/2 (* lambda1 (cos 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 (+ (sin lambda2) (* -1/2 (* lambda1 (cos 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 (+ (sin lambda2) (* -1/2 (* lambda1 (cos lambda2))))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) 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 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) (* (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) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (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))
(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))
(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))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))
(+ (* -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 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 (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 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 (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 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 (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 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) (* (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))))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(+ (* (sin lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin lambda2) (sin phi1)))) (* 1/24 (* (sin lambda2) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2))) (*.f64 phi2 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(* (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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(* (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 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (cos.f64 (-.f64 lambda1 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 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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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) (* (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) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (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 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 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 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 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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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) (* (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) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (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 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 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))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))) phi1)
(atan2 (+ (* -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 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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))))
(* phi1 (* (cos phi2) (* (sin lambda1) (sin lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2))) phi1)
(* phi1 (* (cos phi2) (sin lambda2)))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (sin.f64 lambda2))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* (cos phi2) (sin lambda2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (sin lambda2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (sin lambda2)))) (* 1/120 (* (cos phi2) (sin lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2))) phi1)
(* phi1 (* (cos phi2) (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 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #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 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #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 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 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 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #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 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #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 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 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 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #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 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #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 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)) (*.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 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda1 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 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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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) (* (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) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (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 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 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 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 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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (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) (* (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) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (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 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 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))

rewrite279.0ms (1.1%)

Memory
-8.9MiB live, 227.8MiB allocated
Rules
5 280×lower-*.f32
5 240×lower-*.f64
4 652×lower-fma.f32
4 638×lower-fma.f64
2 512×lower-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
075521
0139485
1438437
23290437
08250437
Stop Event
iter limit
node limit
iter limit
Counts
26 → 344
Calls
Call 1
Inputs
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.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)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(*.f64 (cos.f64 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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.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 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))))
(sin.f64 (*.f64 (*.f64 (+.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))
(fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.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 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
(fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
#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))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))
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)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (-.f64 (*.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))) (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 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(*.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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (-.f64 (*.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))) (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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.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 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 4 binary64))
(/.f64 (fma.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 2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 8 binary64))
(/.f64 (fma.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 2 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) #s(literal 8 binary64))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) #s(literal 4 binary64))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 4 binary64))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))))) #s(literal 4 binary64))
(/.f64 (fma.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 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))))) #s(literal 4 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (*.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 8 binary64))
(/.f64 (fma.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (*.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 8 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 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #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 (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))))
(/.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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (-.f64 (*.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))) (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 (-.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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (-.f64 (*.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))) (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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) (-.f64 (*.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))) (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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(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 (*.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 (sin.f64 lambda2) (*.f64 (*.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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(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 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(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 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.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 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(-.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 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))) #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)) (cos.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))
(+.f64 (*.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)))
(*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (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))) (/.f64 #s(literal 1 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 (-.f64 lambda1 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 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.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))
(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))) (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (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))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(/.f64 (-.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 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.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 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (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 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (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))) (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (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 (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (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 (-.f64 lambda1 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 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))))
(/.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))) (+.f64 (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (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)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(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 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (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 #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 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.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))) (-.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 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 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 (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 (*.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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (+.f64 lambda2 lambda1))
(*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (+.f64 lambda2 lambda1) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))
(*.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(/.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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda2 lambda2) lambda2))) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (-.f64 lambda1 lambda2))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (+.f64 lambda2 lambda1))
(*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (+.f64 lambda2 lambda1) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))
(*.f64 (-.f64 lambda1 lambda2) (/.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(/.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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda2 lambda2) lambda2))) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (-.f64 lambda1 lambda2))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (neg.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (+.f64 lambda2 lambda1))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (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 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(-.f64 lambda1 lambda2)
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.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 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 (*.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1))))) #s(literal 4 binary64))
(/.f64 (-.f64 (+.f64 (sin.f64 (-.f64 lambda1 lambda2)) (sin.f64 (+.f64 lambda2 lambda1))) (+.f64 (sin.f64 (-.f64 lambda2 lambda1)) (sin.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.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))) (-.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 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 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 (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 (*.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 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (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 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))))))
(pow.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)))) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)))) (neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1))) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 (*.f64 (cos.f64 lambda2) lambda1) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) #s(literal -1 binary64)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 (neg.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (*.f64 (cos.f64 lambda2) lambda1))
(fma.f64 (cos.f64 lambda2) lambda1 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))
(fma.f64 lambda1 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))
(-.f64 (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (sin.f64 lambda2)))
(+.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1))
(+.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1)))
(*.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2))))
(*.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)))))
(pow.f64 (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2)) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2))) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) (*.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2)) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64))) (-.f64 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) (neg.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2)))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 3 binary64))) (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2)) (-.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 lambda2) (-.f64 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64))) (+.f64 (pow.f64 (cos.f64 lambda2) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 3 binary64)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(fma.f64 lambda1 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) (cos.f64 lambda2))
(-.f64 (/.f64 (pow.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) #s(literal 2 binary64)) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (-.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2))))
(+.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1) (cos.f64 lambda2))
(+.f64 (cos.f64 lambda2) (*.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi2)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(*.f64 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda2))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(*.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 (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)))
(*.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 lambda2) (cos.f64 phi2)) (sin.f64 lambda1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(/.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 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda2))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (sin.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 lambda2) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.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 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (neg.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 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (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 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 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 (+.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 (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 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(/.f64 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (+.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 (fma.f64 (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1))))))
(/.f64 (fma.f64 (neg.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 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) (-.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 (+.f64 lambda2 lambda1))))) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda2 lambda1)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 3 binary64))) (+.f64 (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 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 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 (+.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 (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 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))))
#s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))
(*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))))
(*.f64 (sin.f64 phi1) (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2)))) #s(literal 2 binary64))
(/.f64 (*.f64 #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda2) lambda1) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))) (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2)))) #s(literal 2 binary64))

eval350.0ms (1.3%)

Memory
23.0MiB live, 314.7MiB allocated
Compiler

Compiled 61 664 to 2 500 computations (95.9% saved)

prune666.0ms (2.5%)

Memory
-17.7MiB live, 583.1MiB allocated
Pruning

112 alts after pruning (111 fresh and 1 done)

PrunedKeptTotal
New1 478521 530
Fresh255984
Picked415
Done000
Total1 5071121 619
Accuracy
99.9%
Counts
1 619 → 112
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.7%
(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)) (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)))))
87.4%
(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.7%
(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)) (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)))))
87.4%
(atan2.f64 (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))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
75.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 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
78.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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)))))
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 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
56.2%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) phi1))))
81.4%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
76.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
79.5%
(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)))))
78.8%
(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)))))
75.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
77.4%
(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)))))
87.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)) (*.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))))))
87.4%
(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)))))
83.8%
(atan2.f64 (*.f64 (/.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))))) (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))))))
75.5%
(atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.9%
(atan2.f64 (*.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (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)))))
75.5%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (/.f64 #s(literal 1 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 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.5%
(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)))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
77.4%
(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))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
69.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
67.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
77.4%
(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))))
53.1%
(atan2.f64 (*.f64 (sin.f64 (-.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)))))))
42.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 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
47.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 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
66.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
41.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 lambda2 lambda1) lambda2 (*.f64 lambda1 lambda1)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.4%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))) (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.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (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.0%
(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)))))
42.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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
47.4%
(atan2.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))))))
46.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
47.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)))))
30.8%
(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))))))
47.2%
(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) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
42.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
60.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
46.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) 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)) #s(approx (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
36.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) 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)) #s(approx (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (cos.f64 lambda2)))))))
25.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
40.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (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)))))
36.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (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)))))
26.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 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))))
46.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)) (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))))))
31.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.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))))
24.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64))) lambda2 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))))
40.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
36.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
31.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 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))))
13.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64)) (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
58.4%
(atan2.f64 #s(approx (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (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)))))
58.0%
(atan2.f64 #s(approx (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
46.6%
(atan2.f64 #s(approx (+ (* (* (cos lambda2) (sin lambda1)) (cos phi2)) (* (* (neg (sin lambda2)) (cos lambda1)) (cos phi2))) (*.f64 (sin.f64 lambda1) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
35.3%
(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
29.1%
(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)) #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))))
46.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
52.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (sin.f64 lambda2) (neg.f64 (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)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.3%
(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))))))
52.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
35.8%
(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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
29.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 (*.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))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
39.8%
(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))))))
19.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.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))))))
33.6%
(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.3%
(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))))))
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 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (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 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (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))))))
49.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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 (+.f64 lambda1 lambda2))))))
43.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
44.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)) (cos.f64 lambda2)))))
42.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
29.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.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.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
49.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 (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)))))))
49.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) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
34.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) (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)))))))))
49.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 (sin.f64 phi1) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
49.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) (cos.f64 (-.f64 lambda2 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)) #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)))))))
44.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 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))))
42.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)) (cos.f64 lambda1))))))
17.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.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))))))
31.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 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))))))
47.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (/.f64 #s(literal 1 binary64) (+.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))))))
42.7%
(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))))))
44.2%
(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))))))
42.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)))))
33.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
33.1%
(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))))))
39.5%
(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.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 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))))) (-.f64 (*.f64 (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.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
39.1%
(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))))))
31.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)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
31.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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))))))
99.7%
#s(approx (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))))) (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)))))))
Compiler

Compiled 8 658 to 5 057 computations (41.6% saved)

simplify193.0ms (0.7%)

Memory
0.7MiB live, 111.6MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sin.f64 lambda1)
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
cost-diff0
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
cost-diff0
(*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2))
cost-diff0
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (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-diff320
(*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
cost-diff1408
(*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
cost-diff0
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
cost-diff0
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
cost-diff0
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
cost-diff0
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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
(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
(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))))))
cost-diff0
#s(approx (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))))) (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)))))))
cost-diff6720
(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)))
cost-diff13440
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
Rules
14 040×lower-fma.f32
14 032×lower-fma.f64
4 050×lower-*.f32
4 014×lower-*.f64
2 252×lower--.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
090915
0150932
1266882
2588834
31552834
44184834
56796834
08054829
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (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))))) (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.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))))))
(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)))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 phi2))
(sin.f64 lambda2)
lambda2
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(sin.f64 lambda1)
(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)))))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(sin.f64 phi2)
(cos.f64 phi1)
phi1
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 (*.f64 (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)) #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))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(neg.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(sin.f64 lambda1)
(-.f64 (*.f64 (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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2))
(sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))))
(*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(+.f64 lambda2 lambda1)
lambda2
lambda1
(*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(-.f64 lambda1 lambda2)
(/.f64 #s(literal 1 binary64) (+.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))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 lambda2 lambda1)
lambda2
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(sin.f64 lambda2)
Outputs
#s(approx (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))))) (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)))))))
#s(approx (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))))) (atan2.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))))
(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.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2)) (fma.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(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 (fma.f64 (cos.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))) (cos.f64 phi2))
(neg.f64 (cos.f64 lambda1))
(cos.f64 lambda1)
lambda1
(*.f64 (sin.f64 lambda2) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 lambda2))
(sin.f64 lambda2)
lambda2
(cos.f64 phi2)
phi2
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(sin.f64 lambda1)
(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)))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (neg.f64 (cos.f64 phi2))) (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(*.f64 (sin.f64 phi2) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(sin.f64 phi2)
(cos.f64 phi1)
phi1
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(*.f64 (*.f64 (fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(*.f64 (sin.f64 phi1) (sin.f64 lambda2))
(sin.f64 phi1)
(*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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 (cos.f64 (-.f64 lambda1 lambda2)) (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)
lambda1
(-.f64 (*.f64 (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 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.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))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda2 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)) #s(approx (* (* (sin 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 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(neg.f64 lambda2)
lambda2
(cos.f64 lambda1)
lambda1
(sin.f64 lambda1)
(-.f64 (*.f64 (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 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(*.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))))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda2 lambda1))
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda2 lambda1)
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.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 (sin.f64 phi1) (cos.f64 phi2)))))
(*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))))
(sin.f64 (-.f64 lambda1 lambda2))
(*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(-.f64 lambda1 lambda2)
(+.f64 lambda2 lambda1)
(+.f64 lambda1 lambda2)
lambda2
lambda1
(*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
(/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))
(/.f64 #s(literal 1 binary64) (+.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))))
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(*.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 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(cos.f64 (-.f64 lambda1 lambda2))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
(sin.f64 lambda1)
lambda1
(cos.f64 phi2)
phi2
(-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))
(fma.f64 (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (cos.f64 phi1) (sin.f64 phi2)))
(*.f64 (cos.f64 phi1) (sin.f64 phi2))
(cos.f64 phi1)
phi1
(sin.f64 phi2)
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(sin.f64 phi1)
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))
(+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (+.f64 lambda2 lambda1))
(cos.f64 (+.f64 lambda1 lambda2))
(+.f64 lambda2 lambda1)
(+.f64 lambda1 lambda2)
lambda2
(cos.f64 (-.f64 lambda1 lambda2))
(-.f64 lambda1 lambda2)
#s(literal 1/2 binary64)
(*.f64 (sin.f64 lambda2) (sin.f64 lambda1))
(*.f64 (sin.f64 lambda1) (sin.f64 lambda2))
(sin.f64 lambda2)

localize972.0ms (3.7%)

Memory
22.5MiB live, 691.8MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy0.234375
(*.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))))
accuracy16.038309522946175
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.168754151145453
(cos.f64 (+.f64 lambda2 lambda1))
accuracy38.612061417701554
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0.16015625
(*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2))
accuracy0.234375
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
accuracy16.038309522946175
(cos.f64 (-.f64 lambda1 lambda2))
accuracy16.184270107387512
(sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))))
accuracy16.038309522946175
(cos.f64 (-.f64 lambda2 lambda1))
accuracy28.045147443488343
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy28.200629785800462
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
accuracy33.163600113610194
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
accuracy16.038309522946175
(cos.f64 (-.f64 lambda2 lambda1))
accuracy28.045147443488343
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
accuracy28.200629785800462
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
accuracy38.612061417701554
#s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))
accuracy0.15625
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
accuracy0.16015625
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
accuracy0.21484375
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
accuracy0.2421875
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
Samples
598.0ms189×1valid
96.0ms67×0valid
Compiler

Compiled 770 to 74 computations (90.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 519.0ms
ival-sin: 134.0ms (25.8% of total)
ival-mult: 114.0ms (22% of total)
ival-cos: 108.0ms (20.8% of total)
adjust: 97.0ms (18.7% of total)
ival-add: 23.0ms (4.4% of total)
ival-atan2: 22.0ms (4.2% of total)
ival-sub: 11.0ms (2.1% of total)
ival-neg: 5.0ms (1% of total)
ival-div: 3.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series289.0ms (1.1%)

Memory
8.7MiB live, 164.0MiB allocated
Counts
29 → 1 020
Calls
Call 1
Inputs
#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())
#s(alt (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))) (patch (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))) #<representation binary64>) () ())
#s(alt #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<representation binary64>) () ())
#s(alt (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)))))) (patch (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)))))) #<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 (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)))))) (patch (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())
#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())
#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())
#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())
#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())
#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())
#s(alt #s(approx (* (* (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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<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 (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())
Outputs
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1)))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos lambda2) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda1 (* (cos phi2) (* (sin lambda2) (sin phi1))))))) (* (cos phi2) (* (sin lambda2) (sin phi1))))) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (cos phi2) (sin lambda2))) (taylor 0 lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos phi2) (sin lambda2))) (* lambda1 (* (cos lambda2) (cos phi2)))) (taylor 0 lambda1) (#s(alt (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))) (patch (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))) #<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 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (patch (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))) #<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 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg lambda2)) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 lambda2) (* lambda1 (+ 1 (* 1/2 (* lambda1 lambda2))))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 lambda2) (* lambda1 (+ 1 (* lambda1 (+ (* -1/6 lambda1) (* 1/2 lambda2)))))) (taylor 0 lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (- lambda1 lambda2) (taylor 0 lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt -1 (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* 2 (/ lambda1 lambda2)) 1) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (* -2 (/ lambda1 (pow lambda2 2))) (* 2 (/ 1 lambda2)))) 1) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* lambda1 (+ (* lambda1 (- (* 2 (/ lambda1 (pow lambda2 3))) (* 2 (/ 1 (pow lambda2 2))))) (* 2 (/ 1 lambda2)))) 1) (taylor 0 lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg lambda2))) (taylor 0 lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (* (sin lambda2) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* 1/120 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (sin lambda2) (sin phi1))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (* (cos lambda2) (cos phi2))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 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 (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 (neg lambda2)) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2)))) (taylor 0 lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg lambda2)) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2))))) (taylor 0 lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* lambda1 (+ (* -1/2 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (* 1/6 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda2) (taylor 0 lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* -1 (* lambda1 (sin lambda2)))) (taylor 0 lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2)))) (taylor 0 lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2)))) (taylor 0 lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))) (taylor 0 lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda1) (#s(alt (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))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) (taylor inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (/ lambda2 lambda1))) (/ lambda2 lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* -1 (/ (* lambda2 (- (* -1 lambda2) lambda2)) (pow lambda1 2))))) (/ lambda2 lambda1)) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (+ (* -1 (/ lambda2 lambda1)) (/ (* (pow lambda2 2) (- (* -1 lambda2) lambda2)) (pow lambda1 3)))) (+ (/ lambda2 lambda1) (/ (* lambda2 (- (* -1 lambda2) lambda2)) (pow lambda1 2)))) (taylor inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 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 (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 (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda1) (#s(alt (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))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))))) (taylor -inf lambda1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor -inf lambda1) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) (taylor -inf lambda1) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (+ 1 (* -1 (/ lambda2 lambda1))) (/ lambda2 lambda1)) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* -1 (- (* -1 lambda2) lambda2)) (/ (* lambda2 (- (* -1 lambda2) lambda2)) lambda1)) lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1 (/ (+ (* -1 (- (* -1 lambda2) lambda2)) (* -1 (/ (+ (* -1 (* lambda2 (- (* -1 lambda2) lambda2))) (/ (* (pow lambda2 2) (- (* -1 lambda2) lambda2)) lambda1)) lambda1))) lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (+ 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (+ 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (+ 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (* -1 (+ 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (* -1 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (taylor -inf lambda1) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 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 (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 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (* -1 (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (neg (+ lambda2 (* -1 lambda1)))) (taylor -inf lambda1) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda2 (* -1 lambda1))) (taylor -inf lambda1) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (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))) (patch (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))) #<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 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (patch (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))) #<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 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin lambda1) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt lambda1 (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ lambda1 (* -1 lambda2)) (taylor 0 lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -2 (/ lambda2 lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* lambda2 (- (* 2 (/ lambda2 (pow lambda1 2))) (* 2 (/ 1 lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* lambda2 (- (* lambda2 (+ (* -2 (/ lambda2 (pow lambda1 3))) (* 2 (/ 1 (pow lambda1 2))))) (* 2 (/ 1 lambda1))))) (taylor 0 lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1))) (taylor 0 lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (* (sin lambda1) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (sin lambda1) (sin phi1))))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (sin phi1)) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin phi1) (* -1/6 (* (pow lambda2 2) (sin phi1))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow lambda2 2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin phi1))) (* 1/120 (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin lambda1)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin phi1)) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin phi1))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (cos phi2) (sin phi1)))))))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* -1 (* lambda2 (cos lambda1)))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1)))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1)))))))) (taylor 0 lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (sin lambda1))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1))))) (taylor 0 lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos lambda1) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* -1 (* lambda2 (sin lambda1)))) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1)))) (taylor 0 lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda1) (* (cos phi2) (sin phi1))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1)))) (taylor 0 lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf lambda2) (#s(alt (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))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (cos lambda1))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2))) (taylor inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* lambda2 (- (/ lambda1 lambda2) 1)) (taylor inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt -1 (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (/ lambda1 lambda2) (+ 1 (* -1 (/ lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* -1 (/ (* lambda1 (- lambda1 (* -1 lambda1))) (pow lambda2 2))) (/ lambda1 lambda2)) (+ 1 (* -1 (/ lambda1 lambda2)))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ lambda1 lambda2) (/ (* (pow lambda1 2) (- lambda1 (* -1 lambda1))) (pow lambda2 3))) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (/ (* lambda1 (- lambda1 (* -1 lambda1))) (pow lambda2 2))))) (taylor inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 lambda2)) (taylor inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf lambda2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf lambda2) (#s(alt (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))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))))) (taylor -inf lambda2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) (patch #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (cos lambda1))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2))))) (taylor -inf lambda2) (#s(alt (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) (patch (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* -1 lambda2) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) (patch (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))) #<representation binary64>) () ())) ())
#s(alt -1 (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (/ (- (* -1 lambda1) lambda1) lambda2)) 1) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (/ (- (+ (* -1 lambda1) (* -1 (/ (* lambda1 (- (* -1 lambda1) lambda1)) lambda2))) lambda1) lambda2)) 1) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (/ (- (+ (* -1 lambda1) (* -1 (/ (- (* -1 (/ (* (pow lambda1 2) (- (* -1 lambda1) lambda1)) lambda2)) (* -1 (* lambda1 (- (* -1 lambda1) lambda1)))) lambda2))) lambda1) lambda2)) 1) (taylor -inf lambda2) (#s(alt (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (patch (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf lambda2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (taylor -inf lambda2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf lambda2) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (sin (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (patch (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (cos (+ lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (-.f64 lambda1 lambda2)) (patch (cos.f64 (-.f64 lambda1 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (cos (- lambda1 (* -1 lambda2))) (taylor -inf lambda2) (#s(alt (cos.f64 (+.f64 lambda2 lambda1)) (patch (cos.f64 (+.f64 lambda2 lambda1)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2))))) (taylor -inf lambda2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))))) (taylor 0 phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (sin lambda2))) (* (cos lambda2) (sin lambda1))) (taylor 0 phi2) (#s(alt (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))) (patch (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))) #<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 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (patch (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))) #<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 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (patch (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))) #<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 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2))))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2)))))))) (taylor 0 phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (sin (- lambda1 lambda2)) (taylor 0 phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 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 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin lambda1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (sin phi1)) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin phi1))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (cos lambda2) (sin phi1)))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (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 (*.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 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor inf phi2) (#s(alt (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))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi2) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1 (* (cos lambda1) (* (cos phi2) (sin lambda2)))) (* (cos lambda2) (* (cos phi2) (sin lambda1)))) (taylor -inf phi2) (#s(alt (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))) (patch (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))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (patch #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (patch (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi2) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (sin (- lambda1 lambda2))) (taylor -inf phi2) (#s(alt (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (patch (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (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 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin lambda1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi2) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))))) (taylor 0 phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor 0 phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (sin lambda1) (sin lambda2))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2)))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (sin lambda1) (sin lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (sin lambda2)) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin lambda2) (* -1/6 (* (pow phi1 2) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow phi1 2) (sin lambda2))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin lambda2))) (* 1/120 (sin lambda2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos lambda2) (cos phi2))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2)))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* 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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))) (taylor 0 phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1))))) (taylor -inf phi1) (#s(alt (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) (patch (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))) #<representation binary64>) () ())) ())
#s(alt (atan2 (+ (* -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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 #s(approx (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))))) (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))))))) (patch #s(approx (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))))) (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))))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (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)))))) (patch (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)))))) #<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 (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))))) (taylor -inf phi1) (#s(alt (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.f64 (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)) (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)))))) #<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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))) (taylor -inf phi1) (#s(alt (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) (patch (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda1) (* (sin lambda2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (patch (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (sin lambda2) (sin phi1)) (taylor -inf phi1) (#s(alt (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (patch (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos lambda2) (* (cos phi2) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) #<representation binary64>) () ())) ())
#s(alt (* (cos 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 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
#s(alt (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (taylor -inf phi1) (#s(alt (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) (patch (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))) #<representation binary64>) () ())) ())
Calls

12 calls:

TimeVariablePointExpression
61.0ms
phi2
@inf
((+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (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))))) (atan2 (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (- (* (sin phi2) (cos phi1)) (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (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)) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1)))) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (atan2 (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (sin lambda2) (sin phi1)) (* (* (sin lambda1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
22.0ms
lambda1
@inf
((+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (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))))) (atan2 (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (- (* (sin phi2) (cos phi1)) (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (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)) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1)))) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (atan2 (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (sin lambda2) (sin phi1)) (* (* (sin lambda1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
6.0ms
lambda1
@-inf
((+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (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))))) (atan2 (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (- (* (sin phi2) (cos phi1)) (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (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)) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1)))) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (atan2 (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (sin lambda2) (sin phi1)) (* (* (sin lambda1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
5.0ms
phi2
@-inf
((+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (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))))) (atan2 (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (- (* (sin phi2) (cos phi1)) (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (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)) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1)))) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (atan2 (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (sin lambda2) (sin phi1)) (* (* (sin lambda1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))
5.0ms
lambda2
@inf
((+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (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))))) (atan2 (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (- (* (sin phi2) (cos phi1)) (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (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)) (sin lambda1) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (sin (- lambda1 lambda2)) (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1)))) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (atan2 (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))))) (* (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos phi2)) (atan2 (* (sin (- lambda1 lambda2)) (cos phi2)) (- (* (cos phi1) (sin phi2)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))) (* (sin (- lambda1 lambda2)) (cos phi2)) (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (sin lambda2) (sin phi1)) (* (* (sin lambda1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (- lambda2 lambda1)) (sin (* (+ lambda2 lambda1) (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))))) (cos (- lambda1 lambda2)) (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (cos (+ lambda2 lambda1)) (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))))

simplify241.0ms (0.9%)

Memory
10.7MiB live, 362.0MiB allocated
Algorithm
egg-herbie
Rules
11 630×lower-fma.f64
11 630×lower-fma.f32
6 192×lower-*.f64
6 192×lower-*.f32
5 904×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
090019974
1313519190
2672319139
0823018593
Stop Event
iter limit
node limit
Counts
1 020 → 1 016
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)))))))
(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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(sin (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(* -1 lambda2)
(+ lambda1 (* -1 lambda2))
(+ (* -1 lambda2) (* lambda1 (+ 1 (* 1/2 (* lambda1 lambda2)))))
(+ (* -1 lambda2) (* lambda1 (+ 1 (* lambda1 (+ (* -1/6 lambda1) (* 1/2 lambda2))))))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
-1
(- (* 2 (/ lambda1 lambda2)) 1)
(- (* lambda1 (+ (* -2 (/ lambda1 (pow lambda2 2))) (* 2 (/ 1 lambda2)))) 1)
(- (* lambda1 (+ (* lambda1 (- (* 2 (/ lambda1 (pow lambda2 3))) (* 2 (/ 1 (pow lambda2 2))))) (* 2 (/ 1 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 (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (neg lambda2)))
(+ (* lambda1 (* (cos phi2) (cos (neg lambda2)))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* -1/2 (* lambda1 (* (cos phi2) (sin (neg lambda2))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(+ (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (cos phi2) (sin (neg lambda2)))) (* -1/6 (* lambda1 (* (cos phi2) (cos (neg lambda2))))))) (* (cos phi2) (cos (neg lambda2))))) (* (cos phi2) (sin (neg lambda2))))
(* lambda1 (* (sin lambda2) (sin phi1)))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1))))
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* 1/120 (* (pow lambda1 2) (* (sin lambda2) (sin phi1))))))))
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (sin lambda2) (sin phi1)))))))))
(* 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 (neg lambda2))
(+ (sin (neg lambda2)) (* lambda1 (cos (neg lambda2))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* -1/2 (* lambda1 (sin (neg lambda2)))))))
(+ (sin (neg lambda2)) (* lambda1 (+ (cos (neg lambda2)) (* lambda1 (+ (* -1/2 (sin (neg lambda2))) (* -1/6 (* lambda1 (cos (neg lambda2)))))))))
(cos (neg lambda2))
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(* (cos 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) (* -1 (* lambda1 (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(+ (* (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 (+ (* -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)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin lambda1)
(sin lambda1)
(sin lambda1)
(sin lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
1
(- (+ 1 (* -1 (/ lambda2 lambda1))) (/ lambda2 lambda1))
(- (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* -1 (/ (* lambda2 (- (* -1 lambda2) lambda2)) (pow lambda1 2))))) (/ lambda2 lambda1))
(- (+ 1 (+ (* -1 (/ lambda2 lambda1)) (/ (* (pow lambda2 2) (- (* -1 lambda2) lambda2)) (pow lambda1 3)))) (+ (/ lambda2 lambda1) (/ (* lambda2 (- (* -1 lambda2) lambda2)) (pow lambda1 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 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (cos 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 (- 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)))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* (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 (+ (* -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 (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin lambda1)
(sin lambda1)
(sin lambda1)
(sin lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin (neg (+ lambda2 (* -1 lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
1
(- (+ 1 (* -1 (/ lambda2 lambda1))) (/ lambda2 lambda1))
(+ 1 (* -1 (/ (+ (* -1 (- (* -1 lambda2) lambda2)) (/ (* lambda2 (- (* -1 lambda2) lambda2)) lambda1)) lambda1)))
(+ 1 (* -1 (/ (+ (* -1 (- (* -1 lambda2) lambda2)) (* -1 (/ (+ (* -1 (* lambda2 (- (* -1 lambda2) lambda2))) (/ (* (pow lambda2 2) (- (* -1 lambda2) lambda2)) lambda1)) lambda1))) lambda1)))
(atan2 (* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (cos 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 (+ lambda2 (* -1 lambda1))))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin (* -1 (+ 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)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(cos (- lambda2 (* -1 lambda1)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(* (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)))))))
(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))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(sin lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
1
(+ 1 (* -2 (/ lambda2 lambda1)))
(+ 1 (* lambda2 (- (* 2 (/ lambda2 (pow lambda1 2))) (* 2 (/ 1 lambda1)))))
(+ 1 (* lambda2 (- (* lambda2 (+ (* -2 (/ lambda2 (pow lambda1 3))) (* 2 (/ 1 (pow lambda1 2))))) (* 2 (/ 1 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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin lambda1))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(* lambda2 (* (sin lambda1) (sin phi1)))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1))))
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (sin lambda1) (sin phi1))))))))
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (sin lambda1) (sin phi1)))))))))
(* lambda2 (sin phi1))
(* lambda2 (+ (sin phi1) (* -1/6 (* (pow lambda2 2) (sin phi1)))))
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow lambda2 2) (sin phi1)))))))
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(* (cos phi2) (sin 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 phi2) (sin phi1))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1)))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))))))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (cos phi2) (sin phi1))))))))
(* (cos lambda1) (* (cos 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))))))))
(cos lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(cos lambda1)
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(+ (* lambda2 (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(+ (* (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 (+ (* -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)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin (- lambda1 lambda2))
(* -1 (* lambda2 (cos lambda1)))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
-1
(- (/ lambda1 lambda2) (+ 1 (* -1 (/ lambda1 lambda2))))
(- (+ (* -1 (/ (* lambda1 (- lambda1 (* -1 lambda1))) (pow lambda2 2))) (/ lambda1 lambda2)) (+ 1 (* -1 (/ lambda1 lambda2))))
(- (+ (/ lambda1 lambda2) (/ (* (pow lambda1 2) (- lambda1 (* -1 lambda1))) (pow lambda2 3))) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (/ (* lambda1 (- lambda1 (* -1 lambda1))) (pow lambda2 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 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos 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 (- 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)))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos (+ lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* (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 (+ (* -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 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(sin (+ lambda1 (* -1 lambda2)))
(* -1 (* lambda2 (cos lambda1)))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
-1
(- (* -1 (/ (- (* -1 lambda1) lambda1) lambda2)) 1)
(- (* -1 (/ (- (+ (* -1 lambda1) (* -1 (/ (* lambda1 (- (* -1 lambda1) lambda1)) lambda2))) lambda1) lambda2)) 1)
(- (* -1 (/ (- (+ (* -1 lambda1) (* -1 (/ (- (* -1 (/ (* (pow lambda1 2) (- (* -1 lambda1) lambda1)) lambda2)) (* -1 (* lambda1 (- (* -1 lambda1) lambda1)))) lambda2))) lambda1) lambda2)) 1)
(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))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos 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 (+ 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)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(cos (- lambda1 (* -1 lambda2)))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(+ (* (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 (+ (* -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))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(sin (- lambda1 lambda2))
(+ (sin (- lambda1 lambda2)) (* -1/2 (* (pow phi2 2) (sin (- lambda1 lambda2)))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* 1/24 (* (pow phi2 2) (sin (- lambda1 lambda2)))))))
(+ (sin (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/2 (sin (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (sin (- lambda1 lambda2)))) (* 1/24 (sin (- lambda1 lambda2))))))))
(* (cos 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 lambda2) (sin phi1))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))))))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (cos lambda2) (sin phi1))))))))
(* (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))))))))
(* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(+ (* (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 (+ (* -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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* (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 (+ (* -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)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos phi2) (sin (- lambda1 lambda2)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin lambda1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* 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 (+ (* -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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* phi1 (* (sin lambda1) (sin lambda2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2))))
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (sin lambda1) (sin lambda2))))))))
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (sin lambda1) (sin lambda2)))))))))
(* phi1 (sin lambda2))
(* phi1 (+ (sin lambda2) (* -1/6 (* (pow phi1 2) (sin lambda2)))))
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow phi1 2) (sin lambda2)))))))
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(* phi1 (* (cos lambda2) (cos phi2)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2))))
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow phi1 2) (* (cos lambda2) (cos phi2))))))))
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2)))))))))
(* 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))))
(+ (* (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 (+ (* -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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(+ (* (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 (+ (* -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)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (sin lambda2) (sin phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
Outputs
(* (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 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1))
(* -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))))))
(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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (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 (neg.f64 (sin.f64 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
lambda1
(* lambda1 (+ 1 (* -1/6 (pow lambda1 2))))
(*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* 1/120 (pow lambda1 2)) 1/6))))
(*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(* lambda1 (+ 1 (* (pow lambda1 2) (- (* (pow lambda1 2) (+ 1/120 (* -1/5040 (pow lambda1 2)))) 1/6))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64)) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64)) (*.f64 lambda1 lambda1) #s(literal 1 binary64)) lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (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 (neg.f64 (sin.f64 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(* -1 lambda2)
(neg.f64 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ (* -1 lambda2) (* lambda1 (+ 1 (* 1/2 (* lambda1 lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))
(+ (* -1 lambda2) (* lambda1 (+ 1 (* lambda1 (+ (* -1/6 lambda1) (* 1/2 lambda2))))))
(fma.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) lambda2 (*.f64 #s(literal -1/6 binary64) lambda1)) lambda1 #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))
(* -1 lambda2)
(neg.f64 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
-1
#s(literal -1 binary64)
(- (* 2 (/ lambda1 lambda2)) 1)
(fma.f64 (/.f64 #s(literal 2 binary64) lambda2) lambda1 #s(literal -1 binary64))
(- (* lambda1 (+ (* -2 (/ lambda1 (pow lambda2 2))) (* 2 (/ 1 lambda2)))) 1)
(fma.f64 (fma.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)) #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) lambda2)) lambda1 #s(literal -1 binary64))
(- (* lambda1 (+ (* lambda1 (- (* 2 (/ lambda1 (pow lambda2 3))) (* 2 (/ 1 (pow lambda2 2))))) (* 2 (/ 1 lambda2)))) 1)
(fma.f64 (fma.f64 (fma.f64 (/.f64 lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2)) #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (*.f64 lambda2 lambda2))) lambda1 (/.f64 #s(literal 2 binary64) lambda2)) lambda1 #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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (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/2 binary64) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 #s(literal -1/6 binary64) lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2)))) lambda1) lambda1 (*.f64 (cos.f64 phi2) (fma.f64 lambda1 (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2)))))
(* lambda1 (* (sin lambda2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda2) lambda1) (sin.f64 phi1))
(* lambda1 (+ (* -1/6 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* (sin lambda2) (sin phi1))))
(*.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) lambda1)
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* 1/120 (* (pow lambda1 2) (* (sin lambda2) (sin phi1))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) lambda1)
(* lambda1 (+ (* (sin lambda2) (sin phi1)) (* (pow lambda1 2) (+ (* -1/6 (* (sin lambda2) (sin phi1))) (* (pow lambda1 2) (+ (* -1/5040 (* (pow lambda1 2) (* (sin lambda2) (sin phi1)))) (* 1/120 (* (sin lambda2) (sin phi1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) lambda1)
(* 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 phi2) (cos.f64 lambda2))) 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 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda1 lambda1) #s(literal -1/6 binary64))) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) 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 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) 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 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.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))
(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))
(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 (neg.f64 (sin.f64 lambda2)) #s(literal -1/2 binary64))) lambda1 (cos.f64 lambda2)) lambda1 (neg.f64 (sin.f64 lambda2)))
(cos (neg lambda2))
(cos.f64 lambda2)
(+ (cos (neg lambda2)) (* -1 (* lambda1 (sin (neg lambda2)))))
(fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* -1/2 (* lambda1 (cos (neg lambda2)))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal -1/2 binary64) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(+ (cos (neg lambda2)) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos (neg lambda2))) (* 1/6 (* lambda1 (sin (neg lambda2)))))) (sin (neg lambda2)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))
(* (cos phi2) (* (cos (neg lambda2)) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(+ (* -1 (* lambda1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2)))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))
(+ (* lambda1 (+ (* -1 (* (cos phi2) (* (sin phi1) (sin (neg lambda2))))) (* -1/2 (* lambda1 (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))))) (* (cos phi2) (* (cos (neg lambda2)) (sin phi1))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (*.f64 (*.f64 (sin.f64 lambda2) (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 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (cos.f64 phi2) (*.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))
(cos lambda2)
(cos.f64 lambda2)
(+ (cos lambda2) (* -1 (* lambda1 (sin lambda2))))
(fma.f64 (neg.f64 lambda1) (sin.f64 lambda2) (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* -1/2 (* lambda1 (cos lambda2))) (sin lambda2))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) (cos.f64 lambda2) (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(+ (cos lambda2) (* lambda1 (- (* lambda1 (+ (* -1/2 (cos lambda2)) (* 1/6 (* lambda1 (sin lambda2))))) (sin lambda2))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) lambda1) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2))) lambda1 (neg.f64 (sin.f64 lambda2))) lambda1 (cos.f64 lambda2))
(* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2)))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* 1/2 (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (sin.f64 phi1)) (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1))
(+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (cos lambda2) (cos (neg lambda2)))))) (* lambda1 (+ (* lambda1 (+ (* 1/2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (cos lambda2)) (* -1/2 (cos (neg lambda2))))))) (* lambda1 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda2)) (* -1/6 (sin (neg lambda2))))) (* -1/6 (sin lambda2)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda2) (* -1/2 (+ (sin lambda2) (sin (neg lambda2))))))))))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 lambda2)) (sin.f64 phi1)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 lambda2) #s(literal -1 binary64)) (sin.f64 phi1)) (*.f64 (*.f64 lambda1 (cos.f64 phi2)) (fma.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2)) (sin.f64 phi1) #s(literal 0 binary64)))) lambda1 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))) lambda1))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* -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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
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
#s(literal 1 binary64)
(- (+ 1 (* -1 (/ lambda2 lambda1))) (/ lambda2 lambda1))
(fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 1 binary64))
(- (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* -1 (/ (* lambda2 (- (* -1 lambda2) lambda2)) (pow lambda1 2))))) (/ lambda2 lambda1))
(+.f64 (+.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda2) lambda2) (*.f64 lambda1 lambda1)) (*.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64))) #s(literal 1 binary64))
(- (+ 1 (+ (* -1 (/ lambda2 lambda1)) (/ (* (pow lambda2 2) (- (* -1 lambda2) lambda2)) (pow lambda1 3)))) (+ (/ lambda2 lambda1) (/ (* lambda2 (- (* -1 lambda2) lambda2)) (pow lambda1 2))))
(+.f64 (fma.f64 (*.f64 lambda2 lambda2) (*.f64 (/.f64 lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) #s(literal -2 binary64)) (+.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda2) lambda2) (*.f64 lambda1 lambda1)) (*.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64)))) #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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (cos phi2) (sin (- lambda1 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) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (cos 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 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))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* -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 (+ (* -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 (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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(sin lambda1)
(sin.f64 lambda1)
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (neg (+ lambda2 (* -1 lambda1)))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (neg (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(fma.f64 (neg.f64 lambda1) (/.f64 lambda2 lambda1) lambda1)
1
#s(literal 1 binary64)
(- (+ 1 (* -1 (/ lambda2 lambda1))) (/ lambda2 lambda1))
(fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* -1 (/ (+ (* -1 (- (* -1 lambda2) lambda2)) (/ (* lambda2 (- (* -1 lambda2) lambda2)) lambda1)) lambda1)))
(-.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 lambda2 #s(literal -2 binary64)) (/.f64 lambda2 lambda1) (+.f64 lambda2 lambda2)) lambda1))
(+ 1 (* -1 (/ (+ (* -1 (- (* -1 lambda2) lambda2)) (* -1 (/ (+ (* -1 (* lambda2 (- (* -1 lambda2) lambda2))) (/ (* (pow lambda2 2) (- (* -1 lambda2) lambda2)) lambda1)) lambda1))) lambda1)))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 lambda2 lambda2) (/.f64 (fma.f64 (+.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda2 #s(literal -2 binary64)) (/.f64 (*.f64 lambda2 lambda2) lambda1))) lambda1)) lambda1))
(atan2 (* (cos phi2) (sin (* -1 (+ 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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (+ 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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (+ 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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (* -1 (+ 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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (* -1 (+ lambda2 (* -1 lambda1)))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (neg (+ lambda2 (* -1 lambda1))))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (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 lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (cos 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 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))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (* -1 (+ lambda2 (* -1 lambda1))))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (neg (+ lambda2 (* -1 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos 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 lambda1 lambda2))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda2 (* -1 lambda1)))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (neg (+ lambda2 (* -1 lambda1)))) (cos (- lambda2 (* -1 lambda1))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 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 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.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))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(atan2 (+ (* -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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* -1/2 (* lambda2 (sin lambda1))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 lambda1) (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(+ (sin lambda1) (* lambda2 (+ (* -1 (cos lambda1)) (* lambda2 (+ (* -1/2 (sin lambda1)) (* 1/6 (* lambda2 (cos lambda1))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (sin.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (cos.f64 lambda1))) lambda2 (sin.f64 lambda1))
(sin lambda1)
(sin.f64 lambda1)
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(+ (sin lambda1) (* -1 (* lambda2 (cos lambda1))))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
1
#s(literal 1 binary64)
(+ 1 (* -2 (/ lambda2 lambda1)))
(fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 1 binary64))
(+ 1 (* lambda2 (- (* 2 (/ lambda2 (pow lambda1 2))) (* 2 (/ 1 lambda1)))))
(fma.f64 (fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 lambda1 lambda1)) lambda2 (/.f64 #s(literal -2 binary64) lambda1)) lambda2 #s(literal 1 binary64))
(+ 1 (* lambda2 (- (* lambda2 (+ (* -2 (/ lambda2 (pow lambda1 3))) (* 2 (/ 1 (pow lambda1 2))))) (* 2 (/ 1 lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (/.f64 lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1)) #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) (*.f64 lambda1 lambda1))) lambda2 (/.f64 #s(literal -2 binary64) lambda1)) 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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (cos phi2) (sin lambda1))
(*.f64 (sin.f64 lambda1) (cos.f64 phi2))
(+ (* -1 (* lambda2 (* (cos lambda1) (cos phi2)))) (* (cos phi2) (sin lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* -1/2 (* lambda2 (* (cos phi2) (sin lambda1)))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (*.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1))) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(+ (* lambda2 (+ (* -1 (* (cos lambda1) (cos phi2))) (* lambda2 (+ (* -1/2 (* (cos phi2) (sin lambda1))) (* 1/6 (* lambda2 (* (cos lambda1) (cos phi2)))))))) (* (cos phi2) (sin lambda1)))
(fma.f64 (fma.f64 (neg.f64 (cos.f64 phi2)) (cos.f64 lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 #s(literal 1/6 binary64) lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)))) lambda2)) lambda2 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))
(* lambda2 (* (sin lambda1) (sin phi1)))
(*.f64 (*.f64 (sin.f64 lambda1) lambda2) (sin.f64 phi1))
(* lambda2 (+ (* -1/6 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* (sin lambda1) (sin phi1))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2)
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* 1/120 (* (pow lambda2 2) (* (sin lambda1) (sin phi1))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2)
(* lambda2 (+ (* (sin lambda1) (sin phi1)) (* (pow lambda2 2) (+ (* -1/6 (* (sin lambda1) (sin phi1))) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (* (sin lambda1) (sin phi1)))) (* 1/120 (* (sin lambda1) (sin phi1)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/6 binary64)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1))) lambda2)
(* lambda2 (sin phi1))
(*.f64 (sin.f64 phi1) lambda2)
(* lambda2 (+ (sin phi1) (* -1/6 (* (pow lambda2 2) (sin phi1)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (sin.f64 phi1)) lambda2)
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* 1/120 (* (pow lambda2 2) (sin phi1)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal 1/120 binary64) (*.f64 lambda2 lambda2) #s(literal -1/6 binary64))) (*.f64 lambda2 lambda2) (sin.f64 phi1)) lambda2)
(* lambda2 (+ (sin phi1) (* (pow lambda2 2) (+ (* -1/6 (sin phi1)) (* (pow lambda2 2) (+ (* -1/5040 (* (pow lambda2 2) (sin phi1))) (* 1/120 (sin phi1))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 phi1) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda2 lambda2) #s(literal 1/120 binary64))) (*.f64 lambda2 lambda2) (*.f64 #s(literal -1/6 binary64) (sin.f64 phi1))) (*.f64 lambda2 lambda2) (sin.f64 phi1)) lambda2)
(* (cos phi2) (sin 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 phi2) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 phi2))
(+ (* -1/2 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 lambda2 lambda2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* 1/24 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 lambda2 lambda2) #s(literal -1/2 binary64))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* (cos phi2) (sin phi1)) (* (pow lambda2 2) (+ (* -1/2 (* (cos phi2) (sin phi1))) (* (pow lambda2 2) (+ (* -1/720 (* (pow lambda2 2) (* (cos phi2) (sin phi1)))) (* 1/24 (* (cos phi2) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 lambda2 lambda2) #s(literal 1/24 binary64))) (*.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(* (cos lambda1) (* (cos 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 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.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))
(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))
(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.f64 lambda1)
(+ (cos lambda1) (* lambda2 (sin lambda1)))
(fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (*.f64 (cos.f64 lambda1) lambda2) #s(literal -1/2 binary64) (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* -1/6 (* lambda2 (sin lambda1))))) (* -1 (sin lambda1)))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal -1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(* (cos lambda1) (* (cos phi2) (sin phi1)))
(*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))
(+ (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1)))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))
(+ (* lambda2 (+ (* -1/2 (* lambda2 (* (cos lambda1) (* (cos phi2) (sin phi1))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))) (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (cos.f64 phi2))) lambda2))
(+ (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (cos lambda1) (* (cos phi2) (sin phi1)))) (* -1/6 (* lambda2 (* (cos phi2) (* (sin lambda1) (sin phi1))))))) (* (cos phi2) (* (sin lambda1) (sin phi1))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (sin.f64 phi1) (*.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))
(cos lambda1)
(cos.f64 lambda1)
(+ (cos lambda1) (* -1 (* lambda2 (sin lambda1))))
(fma.f64 (neg.f64 (sin.f64 lambda1)) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* -1/2 (* lambda2 (cos lambda1))) (sin lambda1))))
(fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (cos.f64 lambda1) (neg.f64 (sin.f64 lambda1))) lambda2 (cos.f64 lambda1))
(+ (cos lambda1) (* lambda2 (- (* lambda2 (+ (* -1/2 (cos lambda1)) (* 1/6 (* lambda2 (sin lambda1))))) (sin lambda1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda1) lambda2) #s(literal 1/6 binary64) (*.f64 (cos.f64 lambda1) #s(literal -1/2 binary64))) lambda2 (neg.f64 (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 phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1)))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (sin.f64 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 phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (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)))) (* lambda2 (* (cos phi2) (* (sin phi1) (+ (* -1/2 (+ (* -1/6 (sin lambda1)) (* 1/6 (sin lambda1)))) (* -1/6 (sin lambda1)))))))) (* (cos phi2) (* (sin phi1) (+ (sin lambda1) (* -1/2 (+ (sin lambda1) (* -1 (sin lambda1))))))))) (* (cos lambda1) (* (cos phi2) (sin phi1))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 lambda2 (cos.f64 phi2)) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/6 binary64)) (sin.f64 phi1)) (*.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))))))
(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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (cos lambda1)))
(*.f64 (neg.f64 lambda2) (cos.f64 lambda1))
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* lambda2 (+ (* -1 (cos lambda1)) (/ (sin lambda1) lambda2)))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* lambda2 (- (/ lambda1 lambda2) 1))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
-1
#s(literal -1 binary64)
(- (/ lambda1 lambda2) (+ 1 (* -1 (/ lambda1 lambda2))))
(fma.f64 (/.f64 #s(literal 2 binary64) lambda2) lambda1 #s(literal -1 binary64))
(- (+ (* -1 (/ (* lambda1 (- lambda1 (* -1 lambda1))) (pow lambda2 2))) (/ lambda1 lambda2)) (+ 1 (* -1 (/ lambda1 lambda2))))
(fma.f64 (fma.f64 (/.f64 lambda1 (*.f64 lambda2 lambda2)) #s(literal -2 binary64) (/.f64 #s(literal 2 binary64) lambda2)) lambda1 #s(literal -1 binary64))
(- (+ (/ lambda1 lambda2) (/ (* (pow lambda1 2) (- lambda1 (* -1 lambda1))) (pow lambda2 3))) (+ 1 (+ (* -1 (/ lambda1 lambda2)) (/ (* lambda1 (- lambda1 (* -1 lambda1))) (pow lambda2 2)))))
(-.f64 (fma.f64 (*.f64 lambda1 lambda1) (/.f64 (+.f64 lambda1 lambda1) (*.f64 (*.f64 lambda2 lambda2) lambda2)) (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64))) (/.f64 (fma.f64 lambda1 (/.f64 (+.f64 lambda1 lambda1) lambda2) (neg.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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (cos phi2) (sin (- lambda1 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) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin 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 lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos 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))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (- lambda1 lambda2))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (- lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (- lambda1 lambda2)) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (+ lambda1 lambda2))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* -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 (+ (* -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 (* -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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (fma.f64 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (cos lambda1)))
(*.f64 (neg.f64 lambda2) (cos.f64 lambda1))
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* -1 (* lambda2 (+ (cos lambda1) (* -1 (/ (sin lambda1) lambda2)))))
(*.f64 (-.f64 (/.f64 (sin.f64 lambda1) lambda2) (cos.f64 lambda1)) lambda2)
(* -1 lambda2)
(neg.f64 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(fma.f64 (/.f64 lambda1 lambda2) lambda2 (neg.f64 lambda2))
-1
#s(literal -1 binary64)
(- (* -1 (/ (- (* -1 lambda1) lambda1) lambda2)) 1)
(fma.f64 (/.f64 #s(literal 2 binary64) lambda2) lambda1 #s(literal -1 binary64))
(- (* -1 (/ (- (+ (* -1 lambda1) (* -1 (/ (* lambda1 (- (* -1 lambda1) lambda1)) lambda2))) lambda1) lambda2)) 1)
(-.f64 #s(literal -1 binary64) (/.f64 (fma.f64 lambda1 (/.f64 (+.f64 lambda1 lambda1) lambda2) (*.f64 lambda1 #s(literal -2 binary64))) lambda2))
(- (* -1 (/ (- (+ (* -1 lambda1) (* -1 (/ (- (* -1 (/ (* (pow lambda1 2) (- (* -1 lambda1) lambda1)) lambda2)) (* -1 (* lambda1 (- (* -1 lambda1) lambda1)))) lambda2))) lambda1) lambda2)) 1)
(-.f64 (/.f64 (-.f64 lambda1 (-.f64 (/.f64 (fma.f64 (*.f64 lambda1 #s(literal -2 binary64)) (/.f64 (*.f64 lambda1 lambda1) lambda2) (*.f64 (+.f64 lambda1 lambda1) lambda1)) lambda2) lambda1)) lambda2) #s(literal 1 binary64))
(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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (+ lambda1 (* -1 lambda2))))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (+ lambda1 (* -1 lambda2)))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (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) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin 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 lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos 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))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(sin (+ lambda1 (* -1 lambda2)))
(sin.f64 (-.f64 lambda1 lambda2))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(cos (+ lambda1 (* -1 lambda2)))
(cos.f64 (-.f64 lambda2 lambda1))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(* (cos phi2) (* (cos (+ lambda1 (* -1 lambda2))) (sin phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (cos.f64 phi2))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(cos (- lambda1 (* -1 lambda2)))
(cos.f64 (+.f64 lambda1 lambda2))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 (* -1 lambda2))) (cos (- lambda1 (* -1 lambda2))))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (* (sin lambda1) (* (sin lambda2) (sin phi1))))
(*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))))))))))
(fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* (cos lambda1) (* (cos lambda2) (sin phi1))) (+ (* (sin lambda1) (* (sin lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* -1/2 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* 1/24 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (+ (* 1/24 (* (sin lambda1) (* (sin lambda2) (sin phi1)))) (* (pow phi2 2) (+ (* -1/720 (* (cos lambda1) (* (cos lambda2) (sin phi1)))) (* -1/720 (* (sin lambda1) (* (sin lambda2) (sin phi1))))))))))))))
(fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi2 phi2) (*.f64 #s(literal 1/24 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))
(+ (* -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 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal 1/24 binary64) (cos.f64 lambda2)) (sin.f64 lambda1))) (*.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 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 #s(literal -1/720 binary64) (cos.f64 lambda2)) (sin.f64 lambda1))) (*.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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(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)))
(* (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 lambda2) (sin phi1))
(*.f64 (sin.f64 phi1) (cos.f64 lambda2))
(+ (* -1/2 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* (cos lambda2) (sin phi1)))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* 1/24 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))))))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (fma.f64 #s(literal 1/24 binary64) (*.f64 phi2 phi2) #s(literal -1/2 binary64))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
(+ (* (cos lambda2) (sin phi1)) (* (pow phi2 2) (+ (* -1/2 (* (cos lambda2) (sin phi1))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (cos lambda2) (sin phi1)))) (* 1/24 (* (cos lambda2) (sin phi1))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 lambda2)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 lambda2)) (sin.f64 phi1))) (*.f64 phi2 phi2) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
(* (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)))
(* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))
(*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1))
(+ (* -1/2 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/24 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (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 (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))) (sin.f64 phi1)))
(+ (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi2 2) (+ (* -1/2 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi2 2) (+ (* -1/720 (* (pow phi2 2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/24 (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(fma.f64 (fma.f64 (*.f64 (*.f64 (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))) (sin.f64 phi1)) (fma.f64 #s(literal -1/720 binary64) (*.f64 phi2 phi2) #s(literal 1/24 binary64))) (*.f64 phi2 phi2) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 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))))) (*.f64 phi2 phi2) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos lambda2) (* (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 lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* -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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos phi2) (sin (- lambda1 lambda2)))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(* (cos lambda2) (* (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 lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (* (cos phi2) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2))))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1)
(* phi1 (+ (* (cos lambda1) (* (cos lambda2) (cos phi2))) (+ (* (cos phi2) (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* -1/6 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* 1/120 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (+ (* 1/120 (* (cos phi2) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (cos lambda1) (* (cos lambda2) (cos phi2)))) (* -1/5040 (* (cos phi2) (* (sin lambda1) (sin lambda2)))))))))))))))
(*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) phi1)
(atan2 (+ (* -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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* phi1 (* (sin lambda1) (sin lambda2)))
(*.f64 (*.f64 phi1 (sin.f64 lambda1)) (sin.f64 lambda2))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* (sin lambda1) (sin lambda2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) phi1)
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* 1/120 (* (pow phi1 2) (* (sin lambda1) (sin lambda2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) phi1)
(* phi1 (+ (* (sin lambda1) (sin lambda2)) (* (pow phi1 2) (+ (* -1/6 (* (sin lambda1) (sin lambda2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (sin lambda1) (sin lambda2)))) (* 1/120 (* (sin lambda1) (sin lambda2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 lambda1) #s(literal -1/6 binary64)) (sin.f64 lambda2))) (*.f64 phi1 phi1) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) phi1)
(* phi1 (sin lambda2))
(*.f64 (sin.f64 lambda2) phi1)
(* phi1 (+ (sin lambda2) (* -1/6 (* (pow phi1 2) (sin lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (sin.f64 lambda2)) phi1)
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* 1/120 (* (pow phi1 2) (sin lambda2)))))))
(*.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (sin.f64 lambda2)) phi1)
(* phi1 (+ (sin lambda2) (* (pow phi1 2) (+ (* -1/6 (sin lambda2)) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (sin lambda2))) (* 1/120 (sin lambda2))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (sin.f64 lambda2) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1) (*.f64 #s(literal -1/6 binary64) (sin.f64 lambda2))) (*.f64 phi1 phi1) (sin.f64 lambda2)) phi1)
(* phi1 (* (cos lambda2) (cos phi2)))
(*.f64 (*.f64 phi1 (cos.f64 lambda2)) (cos.f64 phi2))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* (cos lambda2) (cos phi2))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) phi1)
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* 1/120 (* (pow phi1 2) (* (cos lambda2) (cos phi2))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) phi1)
(* phi1 (+ (* (cos lambda2) (cos phi2)) (* (pow phi1 2) (+ (* -1/6 (* (cos lambda2) (cos phi2))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos lambda2) (cos phi2)))) (* 1/120 (* (cos lambda2) (cos phi2)))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) phi1)
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (* (cos phi2) (cos (- lambda1 lambda2))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* (cos phi2) (cos (- lambda1 lambda2)))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2)))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (cos (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (cos (- lambda1 lambda2)))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (cos (- lambda1 lambda2))))) (* 1/120 (* (cos phi2) (cos (- lambda1 lambda2))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1) #s(literal 1/120 binary64))) (*.f64 phi1 phi1))) (*.f64 phi1 phi1) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1)
(* phi1 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 phi1 (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))
(*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* 1/120 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))))))))
(*.f64 (fma.f64 (*.f64 (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (cos.f64 phi2)) (fma.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1) #s(literal -1/6 binary64))) (*.f64 phi1 phi1) (*.f64 (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))) (cos.f64 phi2))) phi1)
(* phi1 (+ (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))) (* (pow phi1 2) (+ (* -1/6 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2))))) (* (pow phi1 2) (+ (* -1/5040 (* (pow phi1 2) (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))) (* 1/120 (* (cos phi2) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))))))
(*.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 (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))) (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 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))) (*.f64 phi1 phi1) (*.f64 (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(+ (* (cos lambda1) (* (cos lambda2) (* (cos phi2) (sin phi1)))) (* (cos phi2) (* (sin lambda1) (* (sin lambda2) (sin phi1)))))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(atan2 (+ (* -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 (+ (* -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 (neg.f64 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (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 (cos.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (cos.f64 phi1))))
(atan2 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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 (* (cos phi2) (sin (- lambda1 lambda2))) (- (* (cos phi1) (sin phi2)) (* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (*.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))))))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda1) (* (sin lambda2) (sin phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (sin lambda2) (sin phi1))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos lambda2) (* (cos phi2) (sin phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
(* (cos 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) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))
(* (cos phi2) (* (sin phi1) (+ (* 1/2 (+ (cos (+ lambda1 lambda2)) (cos (- lambda1 lambda2)))) (* (sin lambda1) (sin lambda2)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda1 lambda2)) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))

rewrite184.0ms (0.7%)

Memory
-20.4MiB live, 292.0MiB allocated
Rules
5 236×lower-fma.f32
5 228×lower-fma.f64
4 374×lower-*.f32
4 340×lower-*.f64
2 158×lower-pow.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
090555
0149570
1521399
24402399
08146399
Stop Event
iter limit
node limit
iter limit
Counts
29 → 616
Calls
Call 1
Inputs
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))
(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)))
#s(approx (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))))) (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.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.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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)
(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))))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (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 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1)))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 lambda1) (cos.f64 phi2)) (cos.f64 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))
(cos.f64 (-.f64 lambda2 lambda1))
(sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))))
(cos.f64 (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))
(cos.f64 (+.f64 lambda2 lambda1))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
Outputs
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #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 phi2 phi1)))) (*.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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 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 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))) (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (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 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))) (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 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 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) #s(literal -1 binary64)) (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 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)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.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 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(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)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
#s(approx (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))))) (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 (cos.f64 phi1) (sin.f64 phi2)))))
(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 (cos.f64 phi1) (sin.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 (cos.f64 (-.f64 lambda1 lambda2)) (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)
(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 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))))
#s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))))
#s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1))))
(*.f64 (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)))))))
(pow.f64 (/.f64 (-.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)))) (-.f64 (sin.f64 lambda1) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))) (neg.f64 (-.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (-.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)))
(/.f64 (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (*.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 (sin.f64 lambda1) (-.f64 (sin.f64 lambda1) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (sin.f64 lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) lambda2) (sin.f64 lambda1))
(fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1))
(fma.f64 (neg.f64 (cos.f64 lambda1)) lambda2 (sin.f64 lambda1))
(fma.f64 (cos.f64 lambda1) (neg.f64 lambda2) (sin.f64 lambda1))
(fma.f64 lambda2 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda1))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1))) (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (-.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1))))
(-.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) lambda2))
(+.f64 (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda1))
(+.f64 (sin.f64 lambda1) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(*.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))
(*.f64 (*.f64 (+.f64 lambda2 lambda1) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (+.f64 lambda2 lambda1))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 (+.f64 lambda2 lambda1) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))
(pow.f64 (/.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2)) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(/.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 (neg.f64 lambda2) (neg.f64 lambda2))) (-.f64 lambda1 (neg.f64 lambda2)))
(/.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) #s(literal -1 binary64))) (fma.f64 lambda1 lambda1 (-.f64 (*.f64 (neg.f64 lambda2) (neg.f64 lambda2)) (*.f64 lambda1 (neg.f64 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (neg.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) #s(literal 1 binary64)) (+.f64 lambda2 lambda1))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2))) (*.f64 (+.f64 lambda2 lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2)) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2)))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (+.f64 lambda2 lambda1))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(fma.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))
(fma.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))
(fma.f64 lambda2 #s(literal -1 binary64) lambda1)
(fma.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))
(fma.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2)
(-.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))
(-.f64 lambda1 lambda2)
(+.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))
(+.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))
(+.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2) (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))
(+.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1) (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))
(+.f64 (neg.f64 lambda2) lambda1)
(+.f64 lambda1 (neg.f64 lambda2))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda2 lambda1))) (-.f64 lambda2 lambda1))
(*.f64 (/.f64 (-.f64 lambda1 lambda2) (fma.f64 (*.f64 lambda1 lambda1) lambda1 (*.f64 (*.f64 lambda2 lambda2) lambda2))) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (-.f64 lambda1 lambda2))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (-.f64 lambda1 lambda2))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))
(*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))
(pow.f64 (/.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1 binary64)) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (neg.f64 (-.f64 lambda1 lambda2)) (neg.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (neg.f64 (+.f64 lambda2 lambda1)) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (+.f64 lambda2 lambda1)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 lambda2 lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) #s(literal -1 binary64)) (*.f64 (+.f64 lambda2 lambda1) (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) #s(literal 1 binary64)) (*.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (neg.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)) (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda2 lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))
(fma.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) lambda1 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (neg.f64 lambda2)))
(fma.f64 lambda1 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (neg.f64 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(-.f64 (/.f64 lambda1 (+.f64 lambda2 lambda1)) (/.f64 lambda2 (+.f64 lambda2 lambda1)))
(+.f64 (*.f64 lambda1 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))) (*.f64 (neg.f64 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) lambda1) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (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 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) (sin.f64 (-.f64 lambda1 lambda2)))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))) (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (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 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))) (neg.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))) #s(literal -2 binary64))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))))
(/.f64 (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 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 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))) (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (sin.f64 (+.f64 (-.f64 lambda1 lambda2) phi2)) (sin.f64 (-.f64 (-.f64 lambda1 lambda2) phi2)))))
(fma.f64 (*.f64 (cos.f64 phi2) (neg.f64 (sin.f64 lambda2))) (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) #s(literal -1 binary64)) (cos.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (neg.f64 (cos.f64 lambda1)) (cos.f64 phi2)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 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)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (neg.f64 (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.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 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(fma.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(fma.f64 (sin.f64 lambda2) (*.f64 (cos.f64 phi2) (neg.f64 (cos.f64 lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(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)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)) #s(literal 2 binary64)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(-.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)) (cos.f64 phi2)))
(+.f64 (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)))
(+.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2)) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2)))
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (fma.f64 (neg.f64 (sin.f64 phi1)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (sin.f64 phi2))))
(*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2))
(*.f64 (cos.f64 phi2) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)))
(*.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (sin.f64 lambda2))
(*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (sin.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 phi1) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 phi1)))
(*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 lambda2 phi1)) (cos.f64 (+.f64 phi1 lambda2))) (sin.f64 lambda1)) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 lambda1) (-.f64 (cos.f64 (-.f64 lambda2 phi1)) (cos.f64 (+.f64 phi1 lambda2)))) #s(literal 2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 lambda2 phi1)) (cos.f64 (+.f64 phi1 lambda2))) #s(literal 1/2 binary64))
(*.f64 (sin.f64 phi1) (sin.f64 lambda2))
(*.f64 (sin.f64 lambda2) (sin.f64 phi1))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 phi1)) (cos.f64 (+.f64 phi1 lambda2)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 lambda2 phi1)) (cos.f64 (+.f64 phi1 lambda2)))) #s(literal -2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 lambda2)) (cos.f64 (+.f64 phi1 lambda2))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 lambda2 phi1)) (cos.f64 (+.f64 phi1 lambda2))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 lambda2 phi1)) (cos.f64 (+.f64 phi1 lambda2)))))
(-.f64 (/.f64 (cos.f64 (-.f64 lambda2 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 lambda2)) #s(literal 2 binary64)))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (sin.f64 (+.f64 phi2 lambda1)) (sin.f64 (-.f64 lambda1 phi2))) (cos.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (+.f64 phi2 lambda1)) (sin.f64 (-.f64 lambda1 phi2)))) #s(literal 2 binary64))
(*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda2))
(*.f64 (cos.f64 phi2) (*.f64 (sin.f64 phi1) (cos.f64 lambda2)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 lambda2)) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 lambda2) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
#s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.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 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.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 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(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 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.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 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(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)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))) (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))) (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (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 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(/.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 lambda2 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))
(/.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 (+.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 (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))))))
(fma.f64 (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(fma.f64 (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(fma.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))))
(fma.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 lambda1) (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 (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 (sin.f64 lambda2)) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.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 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(-.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 (cos.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda1) (sin.f64 lambda2)))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(+.f64 (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))) (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(+.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))))
(+.f64 (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))) (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))))
(+.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 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (/.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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(pow.f64 (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))))) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.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 lambda2 lambda1))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.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 lambda2 lambda1)))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (+.f64 lambda2 lambda1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(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 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(fma.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.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 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(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)))
(fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))) (*.f64 (sin.f64 (*.f64 lambda1 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (sin.f64 (*.f64 lambda2 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1))))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))) (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))))
(-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))) (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (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 lambda1) (neg.f64 (sin.f64 lambda2))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (neg.f64 (sin.f64 lambda1))))
(cos.f64 (-.f64 lambda1 lambda2))
(cos.f64 (-.f64 lambda2 lambda1))
(+.f64 (*.f64 (cos.f64 (+.f64 lambda1 #s(literal 0 binary64))) (cos.f64 lambda2)) (*.f64 (sin.f64 (+.f64 lambda1 #s(literal 0 binary64))) (sin.f64 lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (cos.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))) (*.f64 (sin.f64 (/.f64 (*.f64 (*.f64 lambda2 lambda2) lambda2) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1))))) (sin.f64 (/.f64 (*.f64 (*.f64 lambda1 lambda1) lambda1) (fma.f64 lambda2 lambda2 (*.f64 lambda1 (+.f64 lambda2 lambda1)))))))
(+.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #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 phi2 phi1)))) (*.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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 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 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (sin.f64 lambda2)) (sin.f64 lambda1)))))
(/.f64 (-.f64 (*.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 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (cos.f64 (-.f64 lambda1 lambda2)))
(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 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (neg.f64 (*.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 (neg.f64 (sin.f64 lambda1)) (sin.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 lambda2)) (sin.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 (-.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64))) (cos.f64 (*.f64 (-.f64 (+.f64 (+.f64 lambda2 lambda1) lambda1) lambda2) #s(literal 1/2 binary64)))) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (cos.f64 lambda1) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda1)) (sin.f64 lambda2)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (neg.f64 (sin.f64 lambda2)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(-.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))
(cos.f64 (+.f64 lambda2 lambda1))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (cos.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))) (*.f64 (sin.f64 (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda2 lambda1))) (sin.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda2 lambda1)))))
(+.f64 (*.f64 (cos.f64 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)) (neg.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))
(*.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(*.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))
(*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (-.f64 lambda1 lambda2)))
(*.f64 (cos.f64 phi2) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (cos.f64 (+.f64 lambda2 lambda1)))
(/.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #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 phi2 phi1)))) (*.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 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64))) (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1)))) (*.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (*.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 lambda2 lambda1))))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (+.f64 (pow.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 3 binary64)))) (*.f64 #s(literal 2 binary64) (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1)))) (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (-.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
(/.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (-.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 (+.f64 lambda2 lambda1))) (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 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 lambda1 lambda2)) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))))) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 3 binary64)))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda1) (sin.f64 phi1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2)) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)) (cos.f64 lambda2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (cos.f64 lambda1) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (cos.f64 phi2) (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi2) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(fma.f64 (sin.f64 lambda1) (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))) (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) #s(literal 2 binary64)) (fma.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 phi1)) (sin.f64 lambda1)) (sin.f64 lambda2) (*.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) #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 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))
(+.f64 (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1)))

eval331.0ms (1.2%)

Memory
15.5MiB live, 561.6MiB allocated
Compiler

Compiled 79 602 to 3 459 computations (95.7% saved)

prune708.0ms (2.7%)

Memory
41.0MiB live, 1 115.6MiB allocated
Pruning

128 alts after pruning (127 fresh and 1 done)

PrunedKeptTotal
New1 863431 906
Fresh2284106
Picked505
Done011
Total1 8901282 018
Accuracy
99.9%
Counts
2 018 → 128
Alt Table
Click to see full alt table
StatusAccuracyProgram
99.7%
(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)) (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)))))
87.4%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda1)) (cos.f64 lambda2) (*.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)))))
99.7%
(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)) (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)))))
87.4%
(atan2.f64 (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))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.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 (+.f64 (sin.f64 (+.f64 phi2 phi1)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
99.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
78.7%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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)))))
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 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
56.2%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin phi1) (cos phi2)) (* (cos lambda1) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (*.f64 (cos.f64 phi2) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))) phi1))))
81.4%
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (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) (cos lambda2))) (* (* (* (sin phi1) (cos phi2)) (sin lambda2)) (sin lambda1))) (*.f64 (sin.f64 phi1) (fma.f64 (sin.f64 lambda1) (sin.f64 lambda2) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))))
76.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
78.8%
(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)))))
75.5%
(atan2.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))) (cos.f64 phi2)) (sin.f64 (+.f64 lambda2 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
77.4%
(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)))))
87.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)) (*.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))))))
87.4%
(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)))))
83.6%
(atan2.f64 (*.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) #s(literal 2 binary64))) (-.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (*.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.5%
(atan2.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (sin.f64 (+.f64 lambda2 lambda1)) (*.f64 (sin.f64 (+.f64 lambda2 lambda1)) (sin.f64 (-.f64 lambda1 lambda2))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
63.9%
(atan2.f64 (*.f64 (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1))))) (sin.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2))))) (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)))))
75.5%
(atan2.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (*.f64 (cos.f64 phi2) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (cos.f64 lambda1) (neg.f64 (sin.f64 lambda2)))))) (/.f64 #s(literal 1 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 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
75.5%
(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)))))
77.4%
(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 (cos.f64 phi1) (sin.f64 phi2))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)) (cos.f64 lambda2)))))
77.4%
(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))))))
77.5%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (-.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda2 lambda1))) #s(literal 1/2 binary64) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
77.6%
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
67.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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
53.1%
(atan2.f64 (*.f64 (sin.f64 (-.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)))))))
42.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 (*.f64 (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2)) (+.f64 (fma.f64 (*.f64 phi1 phi1) #s(literal -1/6 binary64) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))) phi1))))
47.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 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
66.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
45.4%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
71.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (cos.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1))) (*.f64 (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda2)) (sin.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) (+.f64 lambda2 lambda1)) lambda1)))))))
63.3%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 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)))))
71.9%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (sin.f64 phi1)) (cos.f64 phi2))))
62.1%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
36.0%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (fma.f64 (fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 lambda1 lambda1)) lambda2 (/.f64 #s(literal -2 binary64) lambda1)) lambda2 #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)))))
43.0%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (fma.f64 (/.f64 lambda2 lambda1) #s(literal -2 binary64) #s(literal 1 binary64))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
45.5%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) (fma.f64 (/.f64 #s(literal 2 binary64) 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 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ 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)))))
43.7%
(atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ 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)))))
65.0%
(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)))))
42.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 (+.f64 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
47.4%
(atan2.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))))))
46.2%
(atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
47.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)))))
30.8%
(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))))))
47.2%
(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) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))
42.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
60.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (sin.f64 lambda2) lambda1 (cos.f64 lambda2))))))
46.1%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) 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)) #s(approx (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)))))))
36.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (fma.f64 (fma.f64 lambda1 (*.f64 #s(literal -1/2 binary64) lambda1) #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) 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)) #s(approx (+ (* (+ (* -1/2 (* (cos lambda2) lambda1)) (sin lambda2)) lambda1) (cos lambda2)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64)) (cos.f64 lambda2)))))))
25.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))))) (-.f64 (*.f64 (cos.f64 lambda2) lambda1) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2)))))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
40.5%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 lambda1 lambda1)) (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (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)))))
36.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (*.f64 (*.f64 lambda1 (cos.f64 lambda2)) (-.f64 (*.f64 lambda1 (cos.f64 lambda2)) (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (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)))))
26.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (neg.f64 (sin.f64 lambda2))) (*.f64 (cos.f64 lambda2) lambda1)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64)) (fma.f64 (*.f64 #s(literal -1/2 binary64) lambda1) lambda1 #s(literal 1 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda2 lambda2)))) (*.f64 lambda1 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))))
46.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (cos.f64 lambda2) (*.f64 (cos.f64 phi2) (sin.f64 phi1))) (cos.f64 lambda1)))))
39.9%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 phi2)) (sin.f64 (+.f64 phi2 phi1))) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))
46.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)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
38.0%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (fma.f64 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
46.3%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
46.4%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
31.6%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.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))))
24.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal -1/2 binary64) #s(literal 1 binary64)) lambda2) #s(literal 1/6 binary64) (*.f64 #s(literal -1/2 binary64) lambda1)) lambda2 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64))) lambda2 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))))
40.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
31.8%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 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))))
13.2%
(atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (*.f64 (*.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64)) (sin.f64 lambda2)))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (cos.f64 phi2))) phi1))))
35.3%
(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)) #s(approx (cos (- lambda1 lambda2)) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 lambda2) lambda1) (sin.f64 lambda2)) lambda1 (cos.f64 lambda2))))))
29.1%
(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)) #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))))
51.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (*.f64 (cos.f64 lambda1) (cos.f64 phi2)) (neg.f64 lambda2) (*.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))))))
52.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (fma.f64 (sin.f64 lambda2) (neg.f64 (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)) (cos.f64 (-.f64 lambda1 lambda2)))))
48.3%
(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))))))
52.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (-.f64 (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)) (*.f64 (sin.f64 lambda2) (cos.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
29.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 (*.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))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (sin.f64 (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
39.8%
(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))))))
19.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (/.f64 (*.f64 (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.f64 lambda1 lambda1)) (-.f64 lambda1 lambda2)) (fma.f64 lambda2 (+.f64 lambda2 lambda1) (*.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))))))
33.6%
(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.3%
(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))))))
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 (sin.f64 (+.f64 phi1 phi2)) (sin.f64 (-.f64 phi1 phi2))) (cos.f64 (-.f64 lambda2 lambda1))) #s(literal 2 binary64))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (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 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (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))))))
49.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)) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2))))))
49.2%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda1)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))))) (cos.f64 (+.f64 lambda1 lambda2))))))
43.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 #s(approx (- lambda1 lambda2) (*.f64 (-.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) lambda2))))))
44.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)) (cos.f64 lambda2)))))
42.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)))))
45.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))))
49.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) (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
34.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) (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)))))))))
49.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 (sin.f64 phi1) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)) #s(literal 2 binary64))) (cos.f64 (+.f64 lambda2 lambda1)))))))
49.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) (cos.f64 (-.f64 lambda2 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)) #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)))))))
44.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 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))))
42.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)) (cos.f64 lambda1))))))
17.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.f64 lambda1 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
17.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 (*.f64 (+.f64 lambda2 lambda1) (-.f64 lambda1 lambda2)) (fma.f64 (*.f64 lambda2 lambda2) lambda2 (*.f64 (*.f64 lambda1 lambda1) lambda1))) (fma.f64 lambda2 (-.f64 lambda2 lambda1) (*.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))))))
31.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)) (*.f64 (+.f64 lambda2 lambda1) (-.f64 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))))))
47.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (/.f64 #s(literal 1 binary64) (+.f64 lambda2 lambda1)))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
46.9%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 lambda2 lambda1) (/.f64 #s(literal 1 binary64) (+.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))))))
42.7%
(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))))))
42.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)))))
33.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
33.1%
(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))))))
29.4%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.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.1%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (fma.f64 (neg.f64 lambda2) (cos.f64 lambda1) (sin.f64 lambda1)))) (-.f64 (*.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)))))))
35.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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2))))))
39.1%
(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))))))
29.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 (fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))))
26.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 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))
22.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 phi1 (cos.f64 phi2)) (cos.f64 (-.f64 lambda2 lambda1))))))
31.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)))))))
31.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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
31.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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) (-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) lambda2)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 lambda1 lambda1))))) (cos.f64 (+.f64 lambda2 lambda1))))))))
31.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) (+.f64 (*.f64 (sin.f64 lambda2) (sin.f64 lambda1)) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1)))))))
28.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) #s(approx (cos (- lambda2 lambda1)) (fma.f64 (sin.f64 lambda1) lambda2 (cos.f64 lambda1)))))))
27.0%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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))))))
31.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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))))))
31.5%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
32.3%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (*.f64 (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)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin 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))))))
25.8%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (*.f64 (neg.f64 lambda2) (cos.f64 lambda1))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
23.7%
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
23.3%
(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))))))
99.7%
#s(approx (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))))) (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 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (cos.f64 lambda1)) (sin.f64 phi1) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (sin.f64 phi1)) (sin.f64 lambda1))))))
81.4%
#s(approx (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))))) (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)) #s(approx (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))))))))
60.0%
#s(approx (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))))) (atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (sin.f64 lambda2) (cos.f64 phi2)) #s(approx (* (* (sin lambda1) (cos phi2)) (cos lambda2)) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 lambda2)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 lambda2)) (fma.f64 #s(literal -1/5040 binary64) (*.f64 lambda1 lambda1) #s(literal 1/120 binary64))) (*.f64 lambda1 lambda1))) (*.f64 lambda1 lambda1) (*.f64 (cos.f64 phi2) (cos.f64 lambda2))) lambda1))) (-.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)))))))
58.0%
#s(approx (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))))) (atan2.f64 #s(approx (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)))))))
Compiler

Compiled 12 212 to 3 664 computations (70% saved)

regimes363.0ms (1.4%)

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

6 calls:

61.0ms
lambda2
59.0ms
lambda1
59.0ms
(-.f64 lambda1 lambda2)
58.0ms
phi1
57.0ms
phi2
Results
AccuracySegmentsBranch
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1(-.f64 lambda1 lambda2)
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes861.0ms (3.2%)

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

6 calls:

498.0ms
lambda1
91.0ms
phi1
89.0ms
(-.f64 lambda1 lambda2)
58.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)))))
56.0ms
lambda2
Results
AccuracySegmentsBranch
99.7%1lambda1
99.7%1lambda2
99.7%1phi1
99.7%1phi2
99.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
99.7%1(-.f64 lambda1 lambda2)
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes387.0ms (1.5%)

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

6 calls:

80.0ms
lambda2
64.0ms
lambda1
58.0ms
phi1
53.0ms
phi2
53.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
87.6%1lambda1
90.5%2lambda2
87.6%1phi1
92.5%3phi2
87.6%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)))))
87.6%1(-.f64 lambda1 lambda2)
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes74.0ms (0.3%)

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

1 calls:

58.0ms
phi2
Results
AccuracySegmentsBranch
92.5%3phi2
Compiler

Compiled 5 to 4 computations (20% saved)

regimes73.0ms (0.3%)

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

1 calls:

62.0ms
phi2
Results
AccuracySegmentsBranch
92.4%3phi2
Compiler

Compiled 5 to 4 computations (20% saved)

regimes619.0ms (2.3%)

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

6 calls:

205.0ms
phi1
187.0ms
lambda1
55.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)))))
52.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
87.4%1lambda1
87.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)))))
87.4%1phi1
87.4%1(-.f64 lambda1 lambda2)
87.4%1lambda2
87.4%1phi2
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes353.0ms (1.3%)

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

90.0ms
phi1
63.0ms
lambda1
51.0ms
phi2
48.0ms
(-.f64 lambda1 lambda2)
45.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
87.4%1lambda2
87.4%1(-.f64 lambda1 lambda2)
87.4%1lambda1
87.4%1phi1
87.4%1phi2
87.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)))))
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes305.0ms (1.1%)

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

55.0ms
(-.f64 lambda1 lambda2)
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)))))
49.0ms
lambda2
49.0ms
phi2
46.0ms
phi1
Results
AccuracySegmentsBranch
87.4%1lambda1
87.4%1lambda2
87.4%1phi1
87.4%1phi2
87.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)))))
87.4%1(-.f64 lambda1 lambda2)
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes468.0ms (1.8%)

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

6 calls:

244.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)))))
52.0ms
phi2
43.0ms
(-.f64 lambda1 lambda2)
41.0ms
lambda2
40.0ms
phi1
Results
AccuracySegmentsBranch
77.6%1lambda1
80.2%2lambda2
77.6%1phi1
81.1%3phi2
77.6%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)))))
77.6%1(-.f64 lambda1 lambda2)
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes72.0ms (0.3%)

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

1 calls:

43.0ms
lambda2
Results
AccuracySegmentsBranch
80.1%2lambda2
Compiler

Compiled 5 to 4 computations (20% saved)

regimes200.0ms (0.8%)

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

6 calls:

45.0ms
lambda1
44.0ms
phi1
30.0ms
phi2
25.0ms
(-.f64 lambda1 lambda2)
25.0ms
lambda2
Results
AccuracySegmentsBranch
77.4%1lambda1
77.4%1phi1
77.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)))))
77.4%1(-.f64 lambda1 lambda2)
77.4%1phi2
77.4%1lambda2
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes221.0ms (0.8%)

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

6 calls:

52.0ms
(-.f64 lambda1 lambda2)
47.0ms
phi2
44.0ms
lambda2
25.0ms
phi1
24.0ms
lambda1
Results
AccuracySegmentsBranch
73.3%3phi2
77.6%3lambda1
72.1%3phi1
78.6%3lambda2
68.8%1(-.f64 lambda1 lambda2)
70.4%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 55 to 38 computations (30.9% saved)

regimes28.0ms (0.1%)

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

24.0ms
lambda2
Results
AccuracySegmentsBranch
77.7%3lambda2
Compiler

Compiled 5 to 4 computations (20% saved)

regimes79.0ms (0.3%)

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

3 calls:

25.0ms
lambda2
24.0ms
lambda1
22.0ms
phi2
Results
AccuracySegmentsBranch
66.3%1phi2
70.9%3lambda1
72.5%3lambda2
Compiler

Compiled 15 to 12 computations (20% saved)

regimes27.0ms (0.1%)

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

22.0ms
lambda2
Results
AccuracySegmentsBranch
72.5%3lambda2
Compiler

Compiled 5 to 4 computations (20% saved)

regimes39.0ms (0.1%)

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

1 calls:

22.0ms
lambda2
Results
AccuracySegmentsBranch
72.5%3lambda2
Compiler

Compiled 5 to 4 computations (20% saved)

regimes131.0ms (0.5%)

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

5 calls:

31.0ms
phi1
31.0ms
lambda1
22.0ms
(-.f64 lambda1 lambda2)
22.0ms
lambda2
21.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
70.9%3lambda1
66.3%1(-.f64 lambda1 lambda2)
66.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)))))
66.3%1phi1
70.8%3lambda2
Compiler

Compiled 50 to 34 computations (32% saved)

regimes61.0ms (0.2%)

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

2 calls:

30.0ms
lambda2
22.0ms
lambda1
Results
AccuracySegmentsBranch
66.3%1lambda2
66.3%1lambda1
Compiler

Compiled 10 to 8 computations (20% saved)

regimes100.0ms (0.4%)

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

6 calls:

31.0ms
phi1
14.0ms
lambda2
13.0ms
lambda1
13.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
phi2
Results
AccuracySegmentsBranch
61.6%3lambda1
57.2%6phi1
53.2%3(-.f64 lambda1 lambda2)
58.4%3phi2
51.0%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)))))
62.7%4lambda2
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes39.0ms (0.1%)

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

3 calls:

12.0ms
lambda1
12.0ms
lambda2
11.0ms
phi2
Results
AccuracySegmentsBranch
56.2%3phi2
56.3%3lambda2
54.8%3lambda1
Compiler

Compiled 15 to 12 computations (20% saved)

regimes14.0ms (0.1%)

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

1 calls:

11.0ms
lambda2
Results
AccuracySegmentsBranch
56.3%3lambda2
Compiler

Compiled 5 to 4 computations (20% saved)

regimes47.0ms (0.2%)

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

4 calls:

11.0ms
phi2
11.0ms
lambda1
11.0ms
(-.f64 lambda1 lambda2)
11.0ms
lambda2
Results
AccuracySegmentsBranch
53.1%3(-.f64 lambda1 lambda2)
49.1%1lambda1
53.1%3phi2
49.1%1lambda2
Compiler

Compiled 22 to 17 computations (22.7% saved)

regimes43.0ms (0.2%)

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

5 calls:

9.0ms
lambda1
9.0ms
(-.f64 lambda1 lambda2)
8.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
8.0ms
phi2
8.0ms
phi1
Results
AccuracySegmentsBranch
49.1%1lambda1
49.1%1phi1
49.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)))))
49.1%1phi2
49.1%1(-.f64 lambda1 lambda2)
Compiler

Compiled 50 to 34 computations (32% saved)

regimes277.0ms (1%)

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

6 calls:

5.0ms
lambda1
4.0ms
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
4.0ms
lambda2
4.0ms
phi2
4.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
49.8%3lambda2
44.6%1phi1
44.6%1(-.f64 lambda1 lambda2)
49.2%3lambda1
44.6%1phi2
44.6%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)))))
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes8.0ms (0%)

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

2 calls:

4.0ms
lambda2
4.0ms
lambda1
Results
AccuracySegmentsBranch
49.2%3lambda1
49.1%3lambda2
Compiler

Compiled 10 to 8 computations (20% saved)

regimes28.0ms (0.1%)

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

6 calls:

10.0ms
phi2
4.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)))))
3.0ms
lambda1
3.0ms
lambda2
3.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
42.7%1phi1
42.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
42.7%1phi2
42.7%1(-.f64 lambda1 lambda2)
42.7%1lambda2
42.7%1lambda1
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes21.0ms (0.1%)

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

6 calls:

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)))))
3.0ms
phi1
3.0ms
phi2
3.0ms
lambda2
3.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
39.7%3lambda1
37.5%3lambda2
34.6%2phi1
34.7%2phi2
37.7%4(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
37.7%3(-.f64 lambda1 lambda2)
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes15.0ms (0.1%)

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

3.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
lambda1
2.0ms
(-.f64 lambda1 lambda2)
2.0ms
lambda2
2.0ms
phi2
Results
AccuracySegmentsBranch
32.3%1phi1
32.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)))))
32.3%1phi2
32.3%1lambda2
32.3%1(-.f64 lambda1 lambda2)
32.3%1lambda1
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes28.0ms (0.1%)

Memory
-41.3MiB live, 30.0MiB allocated
Counts
3 → 1
Calls
Call 1
Inputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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 (+ (* (neg lambda2) (cos lambda1)) (sin 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)) #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))))))
Outputs
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (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:

18.0ms
phi2
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
lambda2
2.0ms
phi1
2.0ms
(-.f64 lambda1 lambda2)
Results
AccuracySegmentsBranch
30.6%1phi1
30.6%1(-.f64 lambda1 lambda2)
30.6%1lambda1
30.6%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
30.6%1lambda2
30.6%1phi2
Compiler

Compiled 55 to 38 computations (30.9% saved)

regimes12.0ms (0%)

Memory
-16.9MiB live, 22.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)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (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)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (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))))))
Calls

6 calls:

4.0ms
phi1
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
phi2
1.0ms
(-.f64 lambda1 lambda2)
1.0ms
lambda1
Results
AccuracySegmentsBranch
23.7%1lambda1
23.7%1(-.f64 lambda1 lambda2)
23.7%1phi1
23.7%1(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 (-.f64 lambda1 lambda2)))))
23.7%1lambda2
23.7%1phi2
Compiler

Compiled 55 to 38 computations (30.9% saved)

bsearch94.0ms (0.4%)

Memory
19.3MiB live, 177.4MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
14.0ms
8.43448663958847e-78
3.053779629327376e-69
74.0ms
-0.09689259481718858
-1.1395814980674798e-11
Samples
67.0ms127×1valid
11.0ms65×0valid
Compiler

Compiled 1 171 to 684 computations (41.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 70.0ms
ival-cos: 24.0ms (34.4% of total)
ival-sin: 24.0ms (34.4% of total)
ival-mult: 9.0ms (12.9% 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)

bsearch121.0ms (0.5%)

Memory
-5.6MiB live, 149.7MiB allocated
Algorithm
binary-search
Stop Event
predicate-same
narrow-enough
Steps
TimeLeftRight
0.0ms
8.43448663958847e-78
3.053779629327376e-69
115.0ms
-30715391146.662125
-0.09689259481718858
Samples
85.0ms116×1valid
23.0ms44×0valid
Compiler

Compiled 1 135 to 672 computations (40.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 101.0ms
ival-sin: 40.0ms (39.6% of total)
ival-cos: 28.0ms (27.7% of total)
ival-mult: 23.0ms (22.8% of total)
adjust: 5.0ms (4.9% of total)
ival-sub: 3.0ms (3% of total)
ival-atan2: 3.0ms (3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch101.0ms (0.4%)

Memory
3.0MiB live, 124.4MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
94.0ms
2.1851392409890887e-28
3.9688429336048954e-25
1.0ms
-30715391146.662125
-0.09689259481718858
Samples
82.0ms95×1valid
7.0ms33×0valid
Compiler

Compiled 1 525 to 906 computations (40.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 83.0ms
ival-cos: 46.0ms (55.6% of total)
ival-sin: 22.0ms (26.6% of total)
ival-mult: 6.0ms (7.3% of total)
adjust: 4.0ms (4.8% of total)
ival-sub: 2.0ms (2.4% of total)
ival-atan2: 2.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch103.0ms (0.4%)

Memory
-14.0MiB live, 144.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
97.0ms
192352248884399.72
1.962804675912068e+22
Samples
83.0ms118×1valid
4.0ms26×0valid
Compiler

Compiled 634 to 420 computations (33.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 81.0ms
ival-sin: 39.0ms (48.2% of total)
ival-cos: 24.0ms (29.7% of total)
ival-mult: 6.0ms (7.4% of total)
adjust: 5.0ms (6.2% of total)
ival-sub: 3.0ms (3.7% of total)
ival-atan2: 3.0ms (3.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
2.3MiB live, 2.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
1.0ms
192352248884399.72
1.962804675912068e+22
Compiler

Compiled 580 to 375 computations (35.3% saved)

bsearch160.0ms (0.6%)

Memory
11.6MiB live, 205.5MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
73.0ms
3.1654351609327253e-18
3.533943027831543e-13
78.0ms
-769550883.1760924
-6451567.481279422
Samples
112.0ms109×1valid
29.0ms147×0valid
Compiler

Compiled 927 to 600 computations (35.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 130.0ms
ival-cos: 61.0ms (46.9% of total)
ival-sin: 47.0ms (36.1% of total)
ival-mult: 9.0ms (6.9% of total)
adjust: 5.0ms (3.8% of total)
ival-sub: 4.0ms (3.1% of total)
ival-atan2: 4.0ms (3.1% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
5.6MiB live, 5.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.1654351609327253e-18
3.533943027831543e-13
1.0ms
-769550883.1760924
-6451567.481279422
Compiler

Compiled 927 to 600 computations (35.3% saved)

bsearch132.0ms (0.5%)

Memory
24.2MiB live, 260.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
50.0ms
3.1654351609327253e-18
3.533943027831543e-13
75.0ms
-1.2711878273521226e-171
-3.568744848009509e-178
Samples
79.0ms119×1valid
29.0ms137×0valid
Compiler

Compiled 1 030 to 672 computations (34.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 93.0ms
ival-sin: 36.0ms (38.8% of total)
ival-cos: 32.0ms (34.5% of total)
ival-mult: 9.0ms (9.7% of total)
ival-atan2: 6.0ms (6.5% of total)
adjust: 5.0ms (5.4% of total)
ival-sub: 4.0ms (4.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch8.0ms (0%)

Memory
-33.2MiB live, 6.2MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.1654351609327253e-18
3.533943027831543e-13
1.0ms
-1.2711878273521226e-171
-3.568744848009509e-178
Compiler

Compiled 1 012 to 654 computations (35.4% saved)

bsearch2.0ms (0%)

Memory
6.1MiB live, 6.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.1654351609327253e-18
3.533943027831543e-13
1.0ms
-1.2711878273521226e-171
-3.568744848009509e-178
Compiler

Compiled 1 012 to 654 computations (35.4% saved)

bsearch236.0ms (0.9%)

Memory
6.5MiB live, 391.8MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
138.0ms
3.3789671607672652e+97
3.682003565407101e+104
87.0ms
-168466.0206322039
-0.016065927680182033
Samples
180.0ms208×1valid
32.0ms80×0valid
Compiler

Compiled 1 003 to 654 computations (34.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 200.0ms
ival-sin: 77.0ms (38.5% of total)
ival-cos: 61.0ms (30.5% of total)
adjust: 38.0ms (19% of total)
ival-mult: 13.0ms (6.5% of total)
ival-atan2: 6.0ms (3% of total)
ival-sub: 5.0ms (2.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch148.0ms (0.6%)

Memory
7.1MiB live, 322.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
79.0ms
2.6219002351332656e-14
0.0007919949242874977
60.0ms
-1.024700646238757e-90
-1.18334665494068e-92
Samples
99.0ms137×1valid
29.0ms135×0valid
Compiler

Compiled 932 to 619 computations (33.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 115.0ms
ival-sin: 46.0ms (40% of total)
ival-cos: 39.0ms (33.9% of total)
ival-mult: 10.0ms (8.7% of total)
adjust: 8.0ms (7% of total)
ival-sub: 6.0ms (5.2% of total)
ival-atan2: 6.0ms (5.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch130.0ms (0.5%)

Memory
-17.0MiB live, 116.3MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
74.0ms
3.1654351609327253e-18
3.533943027831543e-13
22.0ms
-1.2711878273521226e-171
-3.568744848009509e-178
Samples
78.0ms68×1valid
11.0ms60×0valid
Compiler

Compiled 967 to 636 computations (34.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 84.0ms
ival-sin: 52.0ms (62% of total)
ival-cos: 20.0ms (23.8% of total)
ival-mult: 5.0ms (6% of total)
adjust: 3.0ms (3.6% of total)
ival-sub: 2.0ms (2.4% of total)
ival-atan2: 2.0ms (2.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory
6.9MiB live, 6.9MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.1654351609327253e-18
3.533943027831543e-13
1.0ms
-1.2711878273521226e-171
-3.568744848009509e-178
Compiler

Compiled 949 to 618 computations (34.9% saved)

bsearch1.0ms (0%)

Memory
1.4MiB live, 1.4MiB allocated
Algorithm
left-value
Steps
TimeLeftRight
0.0ms
1.4096191388748038e-231
2.638413996955854e-229
0.0ms
-1.669397269646721e-8
-3.533943027831543e-13
Compiler

Compiled 29 to 24 computations (17.2% saved)

bsearch2.0ms (0%)

Memory
4.0MiB live, 4.0MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
1.0ms
3.1654351609327253e-18
3.533943027831543e-13
1.0ms
-769550883.1760924
-6451567.481279422
Compiler

Compiled 808 to 513 computations (36.5% saved)

bsearch206.0ms (0.8%)

Memory
-8.9MiB live, 307.1MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
79.0ms
2.6219002351332656e-14
0.0007919949242874977
118.0ms
-1.4604118220302572e+33
-1.4213545406003823e+30
Samples
170.0ms188×1valid
15.0ms84×0valid
Compiler

Compiled 885 to 554 computations (37.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 156.0ms
ival-cos: 71.0ms (45.5% of total)
ival-sin: 52.0ms (33.4% of total)
ival-mult: 15.0ms (9.6% of total)
adjust: 8.0ms (5.1% of total)
ival-sub: 5.0ms (3.2% of total)
ival-atan2: 5.0ms (3.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch130.0ms (0.5%)

Memory
16.8MiB live, 238.6MiB allocated
Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
66.0ms
2.6219002351332656e-14
0.0007919949242874977
56.0ms
-1.4604118220302572e+33
-1.4213545406003823e+30
Samples
89.0ms138×1valid
22.0ms86×0valid
Compiler

Compiled 913 to 546 computations (40.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 102.0ms
ival-cos: 36.0ms (35.4% of total)
ival-sin: 32.0ms (31.5% of total)
ival-mult: 11.0ms (10.8% of total)
ival-atan2: 11.0ms (10.8% of total)
adjust: 8.0ms (7.9% of total)
ival-sub: 4.0ms (3.9% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify53.0ms (0.2%)

Memory
10.1MiB live, 55.2MiB allocated
Algorithm
egg-herbie
Rules
148×*-commutative_binary64
100×+-commutative_binary64
96×sub-neg_binary64
66×neg-sub0_binary64
66×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03112835
14192835
25362835
35992835
46362835
56452835
Stop Event
saturated
Calls
Call 1
Inputs
#s(approx (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))))) (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.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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 (cos.f64 lambda2) (cos.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))
(if (<=.f64 phi2 #s(literal -1357680363825023/295147905179352825856 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)) (*.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)))))) (if (<=.f64 phi2 #s(literal 6365737426045269/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 binary64)) #s(approx (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))))) (atan2.f64 #s(approx (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (atan2.f64 (*.f64 (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 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -3530822107858469/36028797018963968 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)) (*.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)))))) (if (<=.f64 phi2 #s(literal 6365737426045269/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 binary64)) #s(approx (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))))) (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)) #s(approx (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.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)) (*.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))))))))
(if (<=.f64 phi2 #s(literal -3530822107858469/36028797018963968 binary64)) (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))))) (if (<=.f64 phi2 #s(literal 66355061549583/170141183460469231731687303715884105728 binary64)) #s(approx (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))))) (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)) #s(approx (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (atan2.f64 (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))) (-.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) (cos.f64 lambda2)) (sin.f64 lambda1) (*.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 (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 (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 lambda2 #s(literal 8400000000000000000000 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ 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))))))
(if (<=.f64 lambda2 #s(literal 8400000000000000000000 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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ 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 (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 -6500000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6500000 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) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 4436777100798803/633825300114114700748351602688 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 (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 4436777100798803/633825300114114700748351602688 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (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 -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 4436777100798803/633825300114114700748351602688 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))))
(if (<=.f64 lambda1 #s(literal -7 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))) (if (<=.f64 lambda1 #s(literal 38000000000000003554738242238702912238703843531211408744324431529878685235437545322052069101666304 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 lambda1 #s(literal -2018278782071263/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 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 lambda1 #s(literal 5029131409596857/9671406556917033397649408 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)))))) (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 lambda2 #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 lambda2 #s(literal 6417481163655411/39614081257132168796771975168 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 #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)))))))
(if (<=.f64 lambda2 #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 lambda2 #s(literal 6417481163655411/39614081257132168796771975168 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 #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))))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -3022314549036573/302231454903657293676544 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 3495959950985713/1747979975492856518824388667826833403974715525645181428798916607807071777670465341756914322865272727992514618482604963383447074020817466839626771608982213111603568988524121832413745194182066575698549805189925857389888339453536229468710863470854144 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.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 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(if (<=.f64 lambda2 #s(literal -6500000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (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))))))))
(if (<=.f64 lambda1 #s(literal -1449999999999999902168966496256 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (if (<=.f64 lambda1 #s(literal 6456360425798343/36893488147419103232 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #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) #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 lambda1))))))
(if (<=.f64 lambda1 #s(literal -8400000000000000054440857960448 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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)))))) (if (<=.f64 lambda1 #s(literal 8500259669165361/37778931862957161709568 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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 (+ (* (neg lambda2) (cos lambda1)) (sin 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)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (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
#s(approx (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))))) (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)))))))
#s(approx (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))))) (atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1))))))
(atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)) (cos.f64 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 (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)) (*.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 -1357680363825023/295147905179352825856 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)) (*.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)))))) (if (<=.f64 phi2 #s(literal 6365737426045269/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 binary64)) #s(approx (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))))) (atan2.f64 #s(approx (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 lambda2)))) (-.f64 (*.f64 (sin.f64 phi2) (cos.f64 phi1)) (fma.f64 (*.f64 (sin.f64 lambda1) (*.f64 (sin.f64 lambda2) (sin.f64 phi1))) (cos.f64 phi2) (*.f64 (cos.f64 lambda1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2))))))) (atan2.f64 (*.f64 (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 (+.f64 (cos.f64 (+.f64 lambda2 lambda1)) (cos.f64 (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda2) (sin.f64 lambda1))))))))
(if (<=.f64 phi2 #s(literal -1357680363825023/295147905179352825856 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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi2 #s(literal 6365737426045269/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 binary64)) #s(approx (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))))) (atan2.f64 #s(approx (+ (* (neg (cos lambda1)) (* (sin lambda2) (cos phi2))) (* (* (sin lambda1) (cos phi2)) (cos lambda2))) (fma.f64 (neg.f64 (cos.f64 lambda1)) (sin.f64 lambda2) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (fma.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2) (*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda2)) (cos.f64 lambda1)))))) (atan2.f64 (*.f64 (fma.f64 (sin.f64 lambda2) (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 lambda2) (sin.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi2 #s(literal -3530822107858469/36028797018963968 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)) (*.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)))))) (if (<=.f64 phi2 #s(literal 6365737426045269/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 binary64)) #s(approx (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))))) (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)) #s(approx (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.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)) (*.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))))))))
(if (<=.f64 phi2 #s(literal -3530822107858469/36028797018963968 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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi2 #s(literal 6365737426045269/31828687130226345097944463881396533766429193651030253916189694521162207808802136034115584 binary64)) #s(approx (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))))) (atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (+.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 (+.f64 lambda1 lambda2))) #s(literal 1/2 binary64) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 phi2 #s(literal -3530822107858469/36028797018963968 binary64)) (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))))) (if (<=.f64 phi2 #s(literal 66355061549583/170141183460469231731687303715884105728 binary64)) #s(approx (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))))) (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)) #s(approx (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (*.f64 (sin.f64 phi1) (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2)))))))) (atan2.f64 (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))) (-.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 -3530822107858469/36028797018963968 binary64)) (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)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 phi2 #s(literal 66355061549583/170141183460469231731687303715884105728 binary64)) #s(approx (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))))) (atan2.f64 (fma.f64 (neg.f64 (cos.f64 lambda1)) (*.f64 (cos.f64 phi2) (sin.f64 lambda2)) (*.f64 (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (cos.f64 phi2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (+ (* (* (sin lambda1) (* (sin lambda2) (sin phi1))) (cos phi2)) (* (cos lambda1) (* (* (sin phi1) (cos phi2)) (cos lambda2)))) (*.f64 (fma.f64 (cos.f64 lambda1) (cos.f64 lambda2) (*.f64 (sin.f64 lambda1) (sin.f64 lambda2))) (sin.f64 phi1)))))) (atan2.f64 (fma.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(atan2.f64 (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))) (-.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) (cos.f64 phi2)) (sin.f64 lambda1) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.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 (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) (*.f64 (*.f64 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1)) (cos.f64 phi2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.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 (neg.f64 (sin.f64 lambda2)) (cos.f64 lambda1))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))
(if (<=.f64 lambda2 #s(literal 8400000000000000000000 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 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda1) (cos.f64 lambda2)))))) (atan2.f64 (*.f64 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ 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))))))
(if (<=.f64 lambda2 #s(literal 8400000000000000000000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (fma.f64 (sin.f64 lambda2) (sin.f64 lambda1) (*.f64 (cos.f64 lambda2) (cos.f64 lambda1))) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (sin.f64 (*.f64 #s(approx (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) #s(literal -1 binary64)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))
(if (<=.f64 lambda2 #s(literal 8400000000000000000000 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 (sin.f64 (*.f64 (+.f64 lambda2 lambda1) #s(approx (* (- lambda1 lambda2) (/ 1 (+ 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))))))
(if (<=.f64 lambda2 #s(literal 8400000000000000000000 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 (sin.f64 (*.f64 #s(approx (* (- lambda1 lambda2) (/ 1 (+ lambda2 lambda1))) #s(literal -1 binary64)) (+.f64 lambda1 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (cos.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (sin.f64 phi1))))
(if (<=.f64 lambda2 #s(literal -6500000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6500000 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -6500000 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) (*.f64 (cos.f64 lambda2) (cos.f64 phi2)))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -6500000 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 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda1)) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))) (atan2.f64 (*.f64 (sin.f64 #s(approx (- lambda1 lambda2) (neg.f64 lambda2))) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 4436777100798803/633825300114114700748351602688 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 (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)) #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)))))))
(if (<=.f64 lambda2 #s(literal -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 4436777100798803/633825300114114700748351602688 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 (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 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 4436777100798803/633825300114114700748351602688 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (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 -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 4436777100798803/633825300114114700748351602688 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (*.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 (cos.f64 phi1) (sin.f64 phi2)) (*.f64 #s(approx (cos (- lambda1 lambda2)) (cos.f64 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 4436777100798803/633825300114114700748351602688 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (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)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 lambda2) (cos.f64 phi2))))))))
(if (<=.f64 lambda2 #s(literal -3654909247210163/8702164874309912144930213176155645990168053640839691029699692760275411924760203145038438437113516616399082774302662672635438355868101955410485575332111767174247731541367082500615833649152 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 4436777100798803/633825300114114700748351602688 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (*.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 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 lambda2) (cos.f64 phi2)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -7 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))) (if (<=.f64 lambda1 #s(literal 38000000000000003554738242238702912238703843531211408744324431529878685235437545322052069101666304 binary64)) (atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (cos.f64 lambda1) (*.f64 (sin.f64 phi1) (cos.f64 phi2))))))))
(if (<=.f64 lambda1 #s(literal -7 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1))))) (if (<=.f64 lambda1 #s(literal 38000000000000003554738242238702912238703843531211408744324431529878685235437545322052069101666304 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (+ (* (+ (cos (+ lambda2 lambda1)) (cos (- lambda1 lambda2))) 1/2) (* (sin lambda2) (sin lambda1)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi2)) (cos.f64 lambda1)))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 lambda2)) (cos.f64 phi2)) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1))))))
(atan2.f64 (*.f64 (sin.f64 (-.f64 lambda1 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 lambda2 lambda1)) (sin.f64 phi1)))))
(if (<=.f64 lambda1 #s(literal -2018278782071263/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 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 lambda1 #s(literal 5029131409596857/9671406556917033397649408 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)))))) (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 lambda1 #s(literal -2018278782071263/18347988927920572092886567162416695526372519913346248989900710715095383008707878464560148424881005492436992 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 5029131409596857/9671406556917033397649408 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 (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 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda2 #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 lambda2 #s(literal 6417481163655411/39614081257132168796771975168 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 #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)))))))
(if (<=.f64 lambda2 #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 6417481163655411/39614081257132168796771975168 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (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 (cos.f64 (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 phi1) (cos.f64 phi2)))))))
(if (<=.f64 lambda2 #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 lambda2 #s(literal 6417481163655411/39614081257132168796771975168 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 #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))))))))
(if (<=.f64 lambda2 #s(literal -6613645304475533/17404329748619824289860426352311291980336107281679382059399385520550823849520406290076876874227033232798165548605325345270876711736203910820971150664223534348495463082734165001231667298304 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 6417481163655411/39614081257132168796771975168 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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 (-.f64 lambda1 lambda2) #s(literal -3022314549036573/302231454903657293676544 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) (cos.f64 (-.f64 lambda2 lambda1)))))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 3495959950985713/1747979975492856518824388667826833403974715525645181428798916607807071777670465341756914322865272727992514618482604963383447074020817466839626771608982213111603568988524121832413745194182066575698549805189925857389888339453536229468710863470854144 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) lambda2 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 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.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 (-.f64 lambda1 lambda2) #s(literal -3022314549036573/302231454903657293676544 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (if (<=.f64 (-.f64 lambda1 lambda2) #s(literal 3495959950985713/1747979975492856518824388667826833403974715525645181428798916607807071777670465341756914322865272727992514618482604963383447074020817466839626771608982213111603568988524121832413745194182066575698549805189925857389888339453536229468710863470854144 binary64)) (atan2.f64 (*.f64 #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (+ (* lambda1 (* -1/2 lambda1)) 1) (neg (sin lambda2))) (* (cos lambda2) lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda1) #s(literal 1/2 binary64) #s(literal -1 binary64)) 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)) (fma.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1) #s(literal 1 binary64))) 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 (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 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(if (<=.f64 lambda2 #s(literal -6500000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (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))))))))
(if (<=.f64 lambda2 #s(literal -6500000 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (sin.f64 phi1))))) (if (<=.f64 lambda2 #s(literal 3466232109999065/9903520314283042199192993792 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (sin.f64 phi1))))) (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 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))))
(if (<=.f64 lambda1 #s(literal -1449999999999999902168966496256 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)))))) (if (<=.f64 lambda1 #s(literal 6456360425798343/36893488147419103232 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (sin.f64 phi1) #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) #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1))))))))
(if (<=.f64 lambda1 #s(literal -1449999999999999902168966496256 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 6456360425798343/36893488147419103232 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) (sin.f64 (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda2)) (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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 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) #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 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (sin.f64 phi1)))))
(if (<=.f64 lambda1 #s(literal -8400000000000000054440857960448 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (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)))))) (if (<=.f64 lambda1 #s(literal 8500259669165361/37778931862957161709568 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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))))))))
(if (<=.f64 lambda1 #s(literal -8400000000000000054440857960448 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (sin.f64 phi1))))) (if (<=.f64 lambda1 #s(literal 8500259669165361/37778931862957161709568 binary64)) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1))))) (atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) (sin.f64 lambda1))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 #s(approx (cos (- lambda2 lambda1)) (cos.f64 lambda1)) (sin.f64 phi1)))))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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 (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (fma.f64 (fma.f64 (*.f64 lambda1 lambda2) #s(literal 1/2 binary64) #s(literal 1 binary64)) lambda1 (neg.f64 lambda2))))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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 (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))
(atan2.f64 #s(approx (* (sin (- lambda1 lambda2)) (cos phi2)) #s(approx (sin (- lambda1 lambda2)) #s(approx (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin 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 (+ (* (neg lambda2) (cos lambda1)) (sin lambda1)) (neg.f64 lambda2)))) (-.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi2)) #s(approx (* (* (sin phi1) (cos phi2)) (cos (- lambda1 lambda2))) (*.f64 (cos.f64 (-.f64 lambda2 lambda1)) (sin.f64 phi1)))))

soundness2.3s (8.8%)

Memory
11.3MiB live, 2 319.2MiB allocated
Rules
14 844×lower-fma.f64
14 844×lower-fma.f32
11 752×lower-fma.f64
11 752×lower-fma.f32
11 630×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02452709
17682627
223572552
344122551
081392499
090019974
1313519190
2672319139
0823018593
055342
0102346
1304322
22303322
08319322
01752
03052
19152
259752
3722552
0808952
090555
0149570
1521399
24402399
08146399
058713724
1200613149
2690813080
0855612770
066015997
1229015415
2446415375
3721115367
0817014949
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 5 853 to 2 382 computations (59.3% saved)

preprocess261.0ms (1%)

Memory
11.4MiB live, 495.5MiB allocated
Compiler

Compiled 3 646 to 452 computations (87.6% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...